It will cut anything but the stuff after the last "/" in $fname.
Example:
$fname = 'lalalla/home';
$fname =~ s!.*/!!;
print $fname;
$fname will be 'home';
Maybe you got confused because ! is used as delimiter here, have a look at
Japhy's excellent perl-regexpr-book to learn how it really works.
giant