$ perl -MPath::Class -le " print dir($_)->basename for @ARGV" ro/sham/bo ono/mato/poeia otorhinolaryngology
bo
poeia
otorhinolaryngology