#!/usr/bin/perl -w
use strict;

my @array =
    (
    'abc', 'def', 'ghi', 'jkl', 'mno', 'pqr', 'stu', 'vwx', 'yz '
    );

print @array[2,4],"\n";
__END__
prints:
ghimno