Pau - Perl Auto Use module
This example reads from stdin and print auto-used document to stdout.
use Pau;
my $source = "";
while (<STDIN>) {
$source .= $_;
}
my $formatted = Pau->auto_use(
source => $source,
lib_paths => ['lib', 't/lib', 'cpan/lib/perl5'],
);
print(STDOUT $formatted);
Pau inserts use-statement if not exist, and deletes use-statement if not used.
Copyright (C) tjmtmmnk.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
tjmtmmnk tjmtmmnk@gmail.com