Sophie: perl-Filter-Simple-0.910.0-4.mga5 noarch

perl-Filter-Simple-0.910.0-4.mga5.noarch.rpm

Info
Deps
Files
Scripts
ChangeLog
Location
Others versions
Analyse

package Demo_Exporter;
$VERSION = '0.01';

use Filter::Simple;
use base Exporter;

@EXPORT = qw(foo);            # symbols to export by default
@EXPORT_OK = qw(bar);         # symbols to export on request

sub foo { print "foo\n" }
sub bar { print "bar\n" }

FILTER {
	s/dye/die/g;
}