perl script files to clean fraud log files to extract sql statements only