I need to write a perl script that searches for a file from standard input and then opens the file along with line numbers to the left of every line.. Been sitting for hours but haven't got it to work. Tips?

Show your code ?

I managed to get it work with the help of: system("find -type f -iname '$filename' -print -exec cat -n {} +"); but that is not pure perl code.

CPAN can make it pure perl code , like find2perl, File::Finder, findrule