c:\@Work\Perl\monks>perl -wMstrict -le
"my @lines = qw(one two three);
 ;;
 print qq{\@lines array (@lines): number of elements: }, scalar @lines;
 print qq{\@lines array (@lines): number of elements: } . @lines;
"
@lines array (one two three): number of elements: 3
@lines array (one two three): number of elements: 3