This does not help with your question but may help anyway. In Perl you can use herepages to avoid lots of print statements and quoting clutter. Here is an example

my $mail_prog = '/usr/lib/sendmail';

my $sender    = 'me@mine.com';
my $recipient = 'you@yours.com';
my $subject   = 'Shopping';

open (MAIL, "|$mail_prog -t -i") or die "Can't open $mail_prog $!";
print MAIL<<MESSAGE;
To: $recipient
Reply-to: $sender 
From: $sender 
Subject: $subject

Thanks for shopping with Perlmonks

love

vroom
MESSAGE
close MAIL;
[download]

As you can see we print everything from the <<MESSAGE to the closing MESSAGE token. The closing token needs to be on a line by itself - no semicolon. You can use almost any token you want. If you do <<MESSAGE or <<"MESSAGE" then variables will interpolate. If you do <<'MESSAGE' they will not. You can include " in the herepage without the need to escape them with a \ so this is pretty cool. You can also assign to a variable with a herepage like $message =<<MESSAGE ....

This makes code much easier to read.

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print