18:38 >perl 505_SoPW.pl
-->./foo<--
$VAR1 = {
          'dir' => './foo'
        };


18:51 >