Help for this page

Select Code to Download

Select or download this

#! /usr/bin/perl
use strict;
...
   };
   print "\n";
};

Select or download this

when init top-level pad is
    HASH(0x22e150) -> $%bar = \{};
...
    HASH(0x22e150) -> $%bar = \{};

when runtime top-level pad is