view release on metacpan or  search on metacpan

lib/Acme/3mxA.pm  view on Meta::CPAN

use utf8;
package Acme::3mxA;

sub import {
  Acme::ǝmɔA->import;
}

"með blóðnasir"

__END__

=encoding utf-8

=head1 NAME

t/02.rewrite.t  view on Meta::CPAN

if(!@ARGV) {
  eval q{ 
    use Test::More tests => 2;
    ok 1;
    ok run_again() =~ /alright!/;
  };
} else {
  print "alright!";
}

sub run_again {
  my $file = __FILE__;
  `$^X $file again`;
}