Thank you all

I think that I am going to go with dws's suggestion. I would have taken Abigail-II's but my method looks like this...

  sub Method{
    my $MethodObject = shift(); #OO style
    my $RootDirectoryCandidate = shift();

    return unless(defined ($RootDirectoryCanidate));
  }
[download]

Thank you all.
Kristofer Hoch