Select Code to Download

#!/usr/bin/perl -wT
use strict;
...

print "\$arr[0] = $arr[0]\n";
print "\$arr[1] = $arr[1]\n";

=OUTPUT
Scalar value @arr[0] better written as $arr[0] at ./arrayslice.pl line
+ 6.
$arr[0] = 58
$arr[1] = Tue Oct 23 14:30:58 2001