NAME
Guitar::Tuner - A Module That Plays Sampled Guitar Sound, To Help You Tune.
VERSION
Version 0.01
SYNOPSIS
use Guitar::Tuner; use Term::ReadKey;
print "Use Space Bar To Play String. \r";
while() { ReadMode 3; # Will Trap One Character, Allows Control Characters
while (not defined ($keypressed = ReadKey(-1)))
{
# No key yet
}
# print "Got key $keypressed\r";
print "Use Space Bar To Play String. \r";
if ($keypressed =~ / /) # Spacebar
{
my @stringtoplay=($child-pid-to-kill, "EString"); # PID of String Playing, Next String.
my @returnarray=Tuner->PlayString(@stringtoplay);
}
}
ReadMode 0; # Reset tty mode before exiting
EXPORT
PlayString: Subroutine To Play String
SUBROUTINES/METHODS
PlayString() Function To Play String Note
EString() Returns Base-64 Decoded Binary Audio, Stored Plain Text <<HERE
AString() Returns Base-64 Decoded Binary Audio Strored Plain Text <<HERE
DString() Returns Base-64 Decoded Binary Audio Strored Plain Text <<HERE
GString() Returns Base-64 Decoded Binary Audio Strored Plain Text <<HERE
BString() Returns Base-64 Decoded Binary Audio Strored Plain Text <<HERE
eString() Returns Base-64 Decoded Binary Audio Strored Plain Text <<HERE
ProtoString() Empty ProtoType of Encoded Guitar-String Sample.
AUTHOR
Piero Bugoni, <Bugoni at cpan.org>
BUGS
Please report any bugs or feature requests to bug-guitar-tuner at rt.cpan.org
, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Guitar-Tuner. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
SUPPORT
You can find documentation for this module with the perldoc command.
perldoc Guitar::Tuner
You can also look for information at:
RT: CPAN's request tracker
AnnoCPAN: Annotated CPAN documentation
CPAN Ratings
Search CPAN
ACKNOWLEDGEMENTS
LICENSE AND COPYRIGHT
Copyright 2011 Piero Bugoni.
This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.