$ perl -e'print scalar(1..10)'
$