Prog_name : print.pl

#!/usr/bin/perl

use strict;
use warnings;

my @array = ( 11,12,13,14,15);

#my @new = @array[join(",",@ARGV)];
my @new = @array[1,3];

print "@new\n";

Output :-
12 14

##</code><code>##

#!/usr/bin/perl

use strict;
use warnings;

my @array = ( 11,12,13,14,15);

my @new = @array[join(",",@ARGV)];
#my @new = @array[1,3];

print "@new\n";

Output : perl print.pl 1 3

Argument "" isn't numeric in array slice at l.pl line 8.
11