CcFinder is a project mainly written in Perl, it's free.

perl script I wrote back in the day to find credit card info in a textfile