Help for this page
perl test.pl D^JkAPE\(SjKHnNl0
D^JkAPE(SjKHnNl0
D^JkAPE\(SjKHnNl0
perl test.pl 'D^JkAPE\(SjKHnNl0'
print("$ARGV[0]\n");