[Israel.pm] A question of style - print()

David Baird david.baird at homemail.com
Mon Oct 31 06:15:08 PST 2005

I sometimes handle this problem with the following Perl code:

    $message = qq{
        |A new service request was sent to an IT representative.
        |Assigned to: $assign_first $assign_last
        |Due date: } . $duedate->string(1) . qq{
        |You can check on the status of your requests from the IT Help Desk
        |web page.
    }) =~ s/^\s+[|]//gm;
    print $message;


More information about the Perl mailing list