(perl) Determine if a string looks like a perl warning