#!/usr/bin/perl -w
use strict;
use Data::Dump::Streamer;
use AutoReloader qw(AUTOLOAD);
AutoReloader->check(1);
$sub = AutoReloader->gensub("foo");
print $sub;
$sub->();
print Dump($sub);
__END__
AutoReloader=CODE(0x8337994)
AutoReloader