1 
2 
3 
4 
5
#!/usr/bin/perl my @test = qw(Just another Perl Hacker); print "Last index of the test list is:", $#test, "\n"; print "Oh, of course ... ", join " ", @test, "\n";