opendir(DIR, $Path->{'real'});

##</code><code>##

/usr/

##</code><code>##

opendir(DIR, "/usr/");

##</code><code>##

$Path->{'real'} = "/usr/";
opendir(DIR, $Path->{'real'});

##</code><code>##

$Path->{'real'} =~ /(.*)/;
$Path->{'real'} = $1;
opendir(DIR, $Path->{'real'});