{
    if(m/\G(\\?\$\w+)/gc or m/\G(\w+)/gc) {
        print "token: '$1'\n";
        redo;
    }
}