some kludges for smartmatch, which should be addressed in perl 5.20