... or you could split the strings into an array on the directory separators, and join them back together, using only the third and fourth entries:

#!/usr/bin/perl -wl

while (<DATA>) {
    chomp;
    print join ( '/', ( split ( '/', $_ ) )[ 3, 4 ] );
}

exit;
__DATA__
/mydirectory/directory/test/z2.htm
/mydirectory/directory/other/testhere.htm
/mydirectory/directory/test/dir/z6.htm
[download]

Of course, I'm sure there's a nicer way of being able to specify "from the third entry onwards", but I was never very good with arrays.

--
bowling trophy thieves, die!