open( SH, "|-", "/bin/sh" ) or die "can't launch a shell: $!\n";

my $param = "whatever";
print SH "echo hello\n";
print SH "echo $param\n";
print SH "echo hi\n";
close SH;