perl -we '$x="j:/tmp/lz/ncak.030610.141654";($m = $_) for split "/",$x;print $m'
ncak.030610.141654