Help for this page

Select Code to Download


  1. or download this
    $| = 1;

...
my $dir = Vz::DirTree->setRoot ( "M:/" ) ;
print Dumper $dir;
  2. or download this
    package Vz::DirTree;
use Data::Dumper;
...

my $dir = Vz::DirTree->setRoot ( "M:/" ) ;
print Dumper $dir;