Update PerlOneLiners.txt