Select Code to Download

#!/usr/bin/perl -l
...

main;

$intfactory->Monitor(\ my $var) = 42;

my $var = $intfactory->Make(42);