| … | … | ||
|---|---|---|---|
| 24 | if (my $audioserver = new Audio::Play (1)) { | 24 | if (my $audioserver = new Audio::Play (1)) { |
| 25 | $audioserver->play ($sound{$sound}); | 25 | $audioserver->play ($sound{$sound}); |
| 26 | $audioserver->flush; | 26 | $audioserver->flush; |
| 27 | undef $audioserver; | 27 | undef $audioserver; |
| 28 | } | 28 | } |
| 29 | } | 29 | }; |
| 30 | use POSIX (); | 30 | use POSIX (); |
| 31 | POSIX::_exit(0); | 31 | POSIX::_exit(0); |
| 32 | } | 32 | } |
| 33 | } | 33 | } |
| 34 | 34 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |