This submission is in response to others asking how to embedded a PERL within a bash or ksh script. Though it may not be a common practice, it does illustrate a couple of examples as to how this would be accomplished.

#!/bin/sh
# If you are not passing bash var's into the PERL HEREDOC,
# then single quote the HEREDOC tag
perl -le "$(cat <<'MYPL'
# Best to build your out vars rather than writing directly
# to the pipe until the end.
my $STDERRdata="", $STDOUTdata="";
while ($i=<STDIN>){ chomp $i;
 $STDOUTdata .= "To stdout\n";
 $STDERRdata .= "Write from within the heredoc\n";
MYPL
print $STDOUTdata; # Doing the pipe write at the end will save you
warn $STDERRdata;  # a lot of frustration.
)" <myInputFile 1>prints.txt 2>warns.txt
[download]

or

#!/bin/sh
set WRITEWHAT="bash vars"
# If you want to include your bash var's
# Escape the $'s that are not bash vars.
perl -le "$(cat <<MYPL
my $STDERRdata="", $STDOUTdata="";
while (\$i=<STDIN>){ chomp \$i;
 \$STDOUTdata .= "To stdout\n";
 \$STDERRdata .= "Write $WRITEWHAT from within the heredoc\n";
MYPL
print \$STDOUTdata; # Doing the pipe write at the end will save you
warn \$STDERRdata;  # a lot of frustration.
)" <myInputFile 1>prints.txt 2>warns.txt
[download]

If you wanted to pass command line arguments, insert them before the < indirect for STDIN.