Select Code to Download

    $ ./d.pl
    $ ./tickle localhost system.introspection

package D;

...
}

1;

#!/usr/bin/perl -w

...
    exec($0, @ARGV);
}

#!/usr/bin/perl

...

;