1Audio::Beep::Linux::PP(U3s)er Contributed Perl DocumentatAiuodnio::Beep::Linux::PP(3)
2
3
4

NAME

6       Audio::Beep::Linux::PP - PurePerl implementation of an Audio::Beep
7       player
8

SYNOPSIS

10           my $player = Audio::Beep::Linux::PP->new();
11

USAGE

13       The "new" class method will return you a new player object.  No other
14       option is available right now.
15

NOTES

17       You need to be root to play something using this module.  Otherwise
18       your script should be SUID root (but i won't suggest that).  Or you
19       could own the tty where you execute this, but it cannot be an xterm.
20       It's better to install the beep program by Johnathan Nightingale and
21       then SUID that small program.  This module is just a rewriting of the
22       core function of the beep program.  I took everything from there so
23       credit goes again to Johnathan Nightingale.  As this is a PurePerl
24       module i had to do some assumption, like the KIOCSOUND constant to be
25       0x4B2F (which may not be your case).  The CLOCK_TICK_RATE is also taken
26       from beep.  Follows what you can read there:
27
28        I don't know where this number comes from, I admit that freely.  A
29        wonderful human named Raine M. Ekman used it in a program that played
30        a tune at the console, and apparently, it's how the kernel likes its
31        sound requests to be phrased.  If you see Raine, thank him for me.
32
33        June 28, email from Peter Tirsek (peter at tirsek dot com):
34
35        This number represents the fixed frequency of the original PC XT's
36        timer chip (the 8254 AFAIR), which is approximately 1.193 MHz. This
37        number is divided with the desired frequency to obtain a counter value,
38        that is subsequently fed into the timer chip, tied to the PC speaker.
39        The chip decreases this counter at every tick (1.193 MHz) and when it
40        reaches zero, it toggles the state of the speaker (on/off, or in/out),
41        resets the counter to the original value, and starts over. The end
42        result of this is a tone at approximately the desired frequency. :)
43

BUGS

45       None known.
46
48       Copyright 2003-2004 Giulio Motta giulienk@cpan.org.
49
50       This library is free software; you can redistribute it and/or modify it
51       under the same terms as Perl itself.
52
53
54
55perl v5.34.0                      2022-01-20         Audio::Beep::Linux::PP(3)
Impressum