3 lines
46 B
Perl
3 lines
46 B
Perl
|
my @l = ($A, $B);
|
||
|
|
push @l, $C, splice @l, 1;
|