Select Code to Download

> cat TEST_PACKAGE.pm 
package TEST_PACKAGE;
...
$TEST_HASH{'TEST_KEY'} = 'TEST_VALUE';

1;

xterm> ./test.pl '/bin/touch $TEST_HASH{'TEST_KEY'}'    # Would create
+ a touchfile called TEST_VALUE
xterm> ./test.pl 'echo Test key contains $TEST_HASH{'TEST_KEY'}'  # Wo
+uld echo TEST_VALUE

> cat test.pl
#!/usr/bin/perl
...

print "\nExecuting command: $command_string\n";
system "$command_string";

xterm> ./test.pl 'echo Test key contains $TEST_HASH{'TEST_KEY'}'   # O
+ne of many trials, with varying escape characters tried
Executing command: echo Test key contains $TEST_HASH{TEST_KEY}
Test key contains {TEST_KEY}