use Pod::PseudoPod::PerlTricks;

my $parser = Pod::PseudoPod::PerlTricks->new;
	
$parser->no_whining( ! ( $ENV{DEBUG} || 0 ) );
$parser->complain_stderr( 1 );
$parser->output_string( *STDOUT );
$parser->parse_file( $ARGV[0] );
