| … | … | ||
|---|---|---|---|
| 30 | 30 | ||
| 31 | BEGIN { | 31 | BEGIN { |
| 32 | eval "use Time::HiRes 'time'"; | 32 | eval "use Time::HiRes 'time'"; |
| 33 | } | 33 | } |
| 34 | 34 | ||
| 35 | $VERSION = 0.53; | 35 | $VERSION = 0.531; |
| 36 | @EXPORT_OK = qw(timeout sleep); | 36 | @EXPORT_OK = qw(timeout sleep); |
| 37 | 37 | ||
| 38 | =item $flag = timeout $seconds; | 38 | =item $flag = timeout $seconds; |
| 39 | 39 | ||
| 40 | This function will wake up the current coroutine after $seconds | 40 | This function will wake up the current coroutine after $seconds |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |