in reply to Re^2: How to export subs in a bin/script for testing in t/00.t
in thread How to export subs in a bin/script for testing in t/00.t

Maybe not more elegant but the name "main" instead of "run" would be a more common convention. Actually google found this exact example here, putting a package name at the top, and calling 
__PACKAGE__->main() unless caller();

[download]

In Section Seekers of Perl Wisdom