#!/bin/sh
str = "Hello"
perl - $str << 'EOF'
$str2 = shift;
$str3 = "world";
print "$str2 $str3\n";
EOF
##here, back in the shell, I need to access $str3.
##Any idea how to do this? Thank you.