my @var = @array # copy the array
my $var = @array # return the count of elements in arrayThis is not a general defense of Perl, which is many times absolutely unreadable, but this example is perfectly comprehensible if you actually are trying to write Perl and not superimpose some other language on it.*