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

my @arr;

@arr[0] = localtime();
$arr[1] = localtime();

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

##</code><code>##

=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