#!/bin/perl

use XML::SAX::Pipeline;
use XML::Filter::BufferText;

my $filter = XML::Filter::BufferText->new();
my $machine = XML::SAX::Pipeline->new($filter);

$machine->parse_file(\*STDIN);

##</code><code>##

Insecure dependency in eval while running setuid at /opt/perl58/lib/5.8.0/PerlIO.pm line 22.
BEGIN failed--compilation aborted.