http://qs321.pair.com?node_id=588568


in reply to how to get the parent directory name?

#!/usr/bin/perl

use strict;
use warnings;
use Cwd;

print Cwd::realpath('..');

[download]

In Section Seekers of Perl Wisdom