$ cat ./pm_11133472.sh echo -n "pw$ApID" #### $ ./pm_11133472.sh pw $ ApID=APXD_IERF ./pm_11133472.sh pwAPXD_IERF #### $ perl -e ' for ("", "APXD_IERF") { $ENV{ApID} = $_; my $pwd = `./pm_11133472.sh`; print "$pwd\n"; } ' pw pwAPXD_IERF
## $ ./pm_11133472.sh pw $ ApID=APXD_IERF ./pm_11133472.sh pwAPXD_IERF ##
## $ perl -e ' for ("", "APXD_IERF") { $ENV{ApID} = $_; my $pwd = `./pm_11133472.sh`; print "$pwd\n"; } ' pw pwAPXD_IERF