Select Code to Download

my $ref = Object->new();
$ref = "$ref";   # overwrite $ref: destroy object

my $ref = Object->new();
my $refstring = "$ref";  # keep object in $ref

#!/usr/bin/perl -w
use strict;
...
    }
    return;
}

-- 
Joost       downtime n. The period during which a system
            is error-free and immune from user input.