#!/usr/bin/perl
use strict;
use warnings;
print "Demo of array slicing \n";
my @abc="a b c d e f g h i j k l m n o p q r s t u v w x y z";
my @a=@abc[1..$#abc];
my @random=@abc[2,3,4,5];
my @comp=@abc[2,4,6,8,10,12,14,16,18,20,22,24];
my @comp1=(@abc[1,3,5],"Hello",@abc[7,9,11]);
print "abc is @abc \n";
print "a is @a \n";
print "random is @random \n";
print "comp is @comp \n";
print "comp1 is @comp1 \n";
can you please help me find the error in the above perl script.