Select Code to Download

#!/bin/bash
APPNAME="AnyApp"
...
}
print "This is the var \$APPNAME and this is what needs to get substit
+uted $APPNAME\n";
EOF

#!/usr/bin/perl
$APPNAME="AnyApp"
require "prog_file.lib";
read_prog

sub read_prog
print <<"EOF";
print "This is the var \$APPNAME and this is what needs to get substit
+uted $APPNAME\n";
EOF
1;