Select Code to Download

#!/usr/bin/perl

...

$th1->join();
$th2->join();

1$VAR1 = {
          'a' => {}
...
          'a' => {},
          'b' => {}
        };