… | … | ||
---|---|---|---|
50 | $w->next; | 50 | $w->next; |
51 | print "\e7\e[C\e[C\e[C\e[C\e[C\e[C\e[C\e[C <time ",time,"> \e8"; | 51 | print "\e7\e[C\e[C\e[C\e[C\e[C\e[C\e[C\e[C <time ",time,"> \e8"; |
52 | }; | 52 | }; |
53 | } | 53 | } |
54 | 54 | ||
55 | cede; # make sure the watchers are installed | ||
55 | print "unlooped with value: ",loop(),"\n"; | 56 | print "unlooped with value: ",loop(),"\n"; |
56 | 57 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |