use File::Basename; ($name,$path,$suffix) = fileparse($fullname,@suffixlist); [download]
In reply to Re: simple regex match question by sanPerl in thread simple regex match question by Anonymous Monk