Parse::YYLex->skip('([\\ \t\r\n]+)|(\/\*.*\*\/)');