Help for this page
perl -e 'print scalar( ($x, $y ) = ( 42, 101, 202 ) ); print "\n$x\n$y +\n";'
perl -E 'say scalar(() = ($a, $b, $c))'