Кратки проблясъци на безумие

Net::FreeDB с поддръжка на FreeBSD

[in English]

Увертюра: Софийският университет, неговият Факултет по математика и информатика, изборната дисциплината Практическо програмиране с Perl, по някое време миналата есен

На курса Практическо програмиране с Perl (който, между другото, ще водим и този есенен семестър) оценките на студентите се оформят от два теста и един проект. Един от проектите беше свързан с разпознаване на компакт-диск и извличане на имената на песните от CDDB или FreeDB.

Доста студенти се спънаха в проблемче: Perl модулът Audio::CD, който ние бяхме препоръчали, не се поддава много лесно на компилиране и инсталиране под Windows. Има един-два модула, които работят само за Windows, като използват MCI или нещо такова, но и при тях инсталацията съвсем не е тривиална. В крайна сметка изглеждаше, че за този проект ще имаме само един участник - доста смела студентка, която си беше написала програмка на Perl, използваща Audio::CD, но изобщо не я беше тествала, защото нямаше достъп до Linux. Когато дойде на изпита, тя беше доста притеснена, но всъщност куражът й беше твърде похвален… а и програмата работеше прекрасно, като се изключат едно-две дребни проблемчета, основно заради недостатъчната документация на самия модул Audio::CD.

Интерлюдия (да, знам, че тя обикновено не следва увертюрата по петите, но какво от това?)

И тогава се появи още една реализация на този проект - Лина беше изнамерила модула Net::FreeDB, който обещаваше достатъчно добра поддръжка на Windows и Linux. Така че, в деня на изпита, аз си го изтеглих (е, няма го във FreeBSD ports collection, добре де, ще го инсталирам от сорс-код с помощта на BSDPAN, не е проблем), разархивирах го, пуснах "perl Makefile.PL"…

Unable to determine OS, Exiting

Мдаааа... мисля, че постреснахме няколко други студенти в компютърната зала на ФМИ, които се бореха със собствените си тестове и проекти за същия изпит, когато избухнахме в бурен истеричен смях при вида на това съобщение. Е, нещата бяха решени лесно - един reboot към Debian, и проектът й взе, че тръгна. Но все пак в следващите дни и седмици нещо ме човъркаше отвътре - защо пък това да не работи и под FreeBSD?

Заключение (или финал? знам ли…)

И така, ето резултата от това човъркане - модулът Net::FreeDB вече върви и под FreeBSD. Ето the patch към сорса, самият порт вече е в ports collection, а за нетърпеливите, ето и a tarball-че на самия порт, ако толкова настоявате да го ползвате преди следващия CVSup :)

Пратих patch-а на Дейвид Шулц - да се надяваме, че следващата версия на Net::FreeDB ще работи и под FreeBSD! И благодаря на Лина за модула - и за порцията смях в компютърната зала :)