package check_module; use warnings; use strict; use Exporter; our @ISA = qw(Exporter); our @EXPORT = qw(@checks); our @checks = ( { name => 'Anybody home?', #script => 'qq/echo $home_dir/', script => sub { `echo $_[0]` }, }, ); 1; __END__