sub usagedie {
    print <<'END_USAGE';
Usage: setperm.pl [-v] [-f perm] [-d perm] [Directory]
-v, --verbose\t show files changed by script
-f, --filemode\t octal mode to change files to
-d, --dirmode\t octal mode to change directories to
END_USAGE
    exit(1);
}

##</code><code>##

    SomeFunction(<<'PARAM1', 42, <<"PARAM3");
this is the
text for param1
PARAM1
and this is the text for param3 with $i
variable interpolation this time
PARAM3