Help for this page

Select Code to Download


  1. or download this
    sub DESTROY
{
    my $output = `some_additional_cleanup 2>&1`;
    ...
}
  2. or download this
    my $obj = My::Object->new();
...
if ($!) {
   die "something bad happened: $!";
}
  3. or download this
    sub DESTROY
{
...
    my $output = `some_additional_cleanup 2>&1`;
    ...
}