Help for this page
Select Code to Download
Select
or
download this
chomp($str = `dirname $str`);
Select
or
download this
use File::Basename; my $dir = dirname($filename);