>perl -MFile::Basename -le"print basename 'foo/bar'" bar >perl -MFile::Basename -le"print basename 'foo\bar'" bar >perl -MFile::Basename -le"print basename 'foo:bar'" bar