http://www.perlmonks.org?node_id=145372


in reply to Re: splitting on win32 linefeeds aka pass the crackpipe!
in thread splitting on win32 linefeeds aka pass the crackpipe!

The original substitution doesn't actually remove a trailing slash; rather, it removes the directory path leaving just the name of the file. If $filename is '/usr/local/bin/perl', $file will be 'perl'.

This is better done with File::Basename.