$ /usr/bin/perl -le'print $a++' 0