Initial Commit
This commit is contained in:
16
database/perl/lib/CPAN/DeferredCode.pm
Normal file
16
database/perl/lib/CPAN/DeferredCode.pm
Normal file
@@ -0,0 +1,16 @@
|
||||
package CPAN::DeferredCode;
|
||||
|
||||
use strict;
|
||||
use vars qw/$VERSION/;
|
||||
|
||||
use overload fallback => 1, map { ($_ => 'run') } qw/
|
||||
bool "" 0+
|
||||
/;
|
||||
|
||||
$VERSION = "5.50";
|
||||
|
||||
sub run {
|
||||
$_[0]->();
|
||||
}
|
||||
|
||||
1;
|
||||
Reference in New Issue
Block a user