Litt perl OOP eksempelkode (tablatur-bot)

[Torbjørn]

jeg satt og lastet ned gitar tabs da jeg fant ut at dette burde man gjøre automatisk, og resultatet ble litt interessang kode for de som er nysgjerrige

 

En superklasse:

http://www.nt.ntnu.no/users/lindahl/TabSpider.pm.html

 

Og to implementasjoner:

http://www.nt.ntnu.no/users/lindahl/Guitar...niverse.pm.html

http://www.nt.ntnu.no/users/lindahl/GuitareTabCom.pm.html

 

for hhv http://www.guitartabs.cc/home.php og http://www.guitaretab.com

[Torbjørn]

kan brukes slik:

guitartabuniverse.pl:
#!/usr/bin/perl
use TabSpider::GuitarTabUniverse;
my $t = new TabSpider::GuitarTabUniverse;

$t->start();

 

og ser slik ut:

[Torbjørn]

Implementert to til:

 

www.tabcrawler.com:

http://www.nt.ntnu.no/users/lindahl/TabCrawler.pm.html

 

og www.ultimate-guitar.com:

http://www.nt.ntnu.no/users/lindahl/Ultima...tarTabs.pm.html