#!/usr/bin/perl -w
use strict;
my (@script) = <<SH;
# Your shell script goes below this line
echo "cool!"
echo "perl does shell scripts, too?";
SH
map { system $_; } @script;