Select Code to Download

    print `${\<<HERE}`;
        date
    HERE

    print qx {${\<<HERE}};
        date
    HERE

    print qr /${\<<HERE}/;
        x*foo
    HERE

    my @words = split ' ' => <<'HERE';
       some words go here
    HERE