echo "foo
bar" |perl -wE'for (<STDIN>) { print "$. $_" }'
2 foo
2 bar