Select Code to Download

#!/usr/bin/perl 
use warnings; use strict;
...

pkg::destroy

pkg 1 created
pkg 1(1) destroyed
...
Use of uninitialized value in printf at /tmp/tst2.pl line 16.
pkg 6() destroyed