Why do we need to key scalar(@list) when only @list would also work?
for e.g.

use strict;
my @abc= ('a','b','c','d');
my $x= @abc;
my $y = scalar(@abc);
print $x."#".$y;
[download]

Here $x & $y both return 4.