| Subject: | Example does not work |
straight out of the POD, this does not outptu anything.
From the POD example, this code does not parse, the only output is <pre></pre>.
use Shell::Parser;
my $parser = Shell::Parser->new(pre => 0);
print $parser->parse("
# find my name
if [ -f /etc/passwd ]; then
grep $USER /etc/passwd | awk -F: '{print $5}' /etc/passwd
fi
");