Honlapot szerettem volna. Hatékonyan szerettem volna. Az elsőre még van esély, hogy teljesül, bár egyre kevesebb.

Nemrég újra elkezdtem honlapot írni, ezúttal PHP-ben MySQL-el ötvözve. A tegnapi nap sikerült megírnom több, mint egy óra alatt egy szavazást, ami nem csinál mást, mint kiolvas egy táblából bizonyos értékeket, megjeleníti ezeket, illetve egy tetszőleges feliratú Submit gombot, amivel szavazni lehet. Szavazáskor a PHP script a szavazás tényét észlelve frissíti a MySQL adatbázist. Azzal is 20 percet szenvedtem, hogy a lekérdezést (QUERY) a MySQL szintaktikájának megfelelő formába öntsem. Jó mi? Egy sor 20 perc. Emellett Cookie-val ellenőriztetni kellett, hogy nehogy kétszer szavazzon valaki. Bár most csinálok ilyet először, de nem az első alkalom miatt tartott ennyi ideig, hanem a rengeteg szintaktikai és szemantikai hiba miatt. Kb. ez is 20 percig tartott. A maradék 50 perc pedig a helyes PHP és HTML kód megírásával, az adatbázissal való ügyeskedéssel (értsd: balfaszkodással) ment el, na és persze a debug-gal. Nincs olyan sor, amibe ne írnék hibát. Már nem is számítok arra, ha valamit megírok, akkor az egyből működik. Nem, 1 perc megírni, 10 perc hibát keresni. És így leszek én majd programozó, közben szétvet az ideg, hogy másoknak egy ilyen 5-10 percig tart, én meg szenvedhetek. Mi lesz ha majd egyetem után a munkahelyemen kell helytállnom. Túlóra lesz majd belőle, nehogy véletlenül legyen egy pici szabadidőm. Egész életemben ez fog kísérteni.

Ezek után már nem csoda, ha egy nap alatt összesen két (és fél) oldalt sikerült összedobnom (értsd: összeszenvednem). Minél többet csinálom, annál kevésbé megy. Főleg, most hogy TFT monitorom van, úgy érzem, nem pörög annyira az agyam és lassabban tudok gondolkodni, mint CRT előtt. Ma arra vetemedtem, hogy megkönnyítem a dolgom egy kicsit. Mivel távoli szerveren van a honlap, amit csinálok, ezért állandóan FTP-n kell feltölteni a fájlokat, amiket szerkesztek. Egy idő után (főleg a fentiekkel fűszerezve) kissé unalmassá válik állandóan Total Commander-ből F5+Enter, sőt néha idle timeout is van (újra kell kapcsolódni), ha jó szokásomhoz híven túl sokáig gondolkodom egy néhány soros megoldáson. Szerkesztésre Notepad++ -t használok, szeretem, mert rengeteg nyelvet ismer, összevonja a blokkokat, kiemeli a szintaxist és tud bűvészkedni is a szöveggel/kóddal. Ami még említésre méltó, hogy el tudja indítani adott külső programmal az éppen szerkesztett fájlt, ráadásul mindezt egy gombnyomásra (lehet billentyűparancsot rendelni az ilyen feladatokhoz). Gondoltam írok hozzá egy külső programot, ami szépen feltölti nekem arra a bizonyos FTP szerverre. Neki is láttam perl-ben, és természetesen mi más lett a vége, mint szenvedés, szarakodás.

Íme a script

	use Net::FTP;
	print "bejelentkezes... ";
	my $ftp = Net::FTP->new("*********.******.**");
	print "ok.n" if($ftp->login("*****","*****"));
	$ftp->pasv();
	$ftp->binary();
	$ftp->cwd("/*********/****/*****");
	print "feltoltes: $ARGV[0]...";
	if($ftp->put($ARGV[0])) {
		print "ok.n";
	} else {
		print "nemok.n";
	}
	$ftp->quit;

Ez a része nem működött. Eddig ismeretlen okokból, azokat a CSS fájlokat (mást nem próbáltam feltölteni), melyeket ennek segítségével akartam feltölteni, egyszerűen szétcseszte. A kapcsoszárójeleket ('{' és '}') véletlen vagy direkt kihagyta a fájlból. Próbáltam $ftp->binary() és $ftp->ascii() -val is, de természetesen nem működött. Teljesen úgy érzem magam ilyenkor egyrészt, mintha valaki szándékosan csinálná ezt velem odafentről, vagy akárhonnan, ahonnan irányítani lehet. Másrészről pedig mindig ott van az előreszabott szarakodási idő, amely időt el kell szarnom, nehogy véletlenül hatékony lehessek és elmondhassam, hogy értek a témához. Azaz egy 1-10-es skálán 1-es bonyolultságú programot is annyi idő alatt kell megírnom, mint egy 7-est mondjuk. Az időelbaszásról pedig gondoskodnak a másoknál soha ki nem jött, megoldhatatlan szar problémák, amik csak és kizárólag azért vannak, hogy nekem keresztbe tegyenek. Érdekes, összetettebb dolgoknál kevesebb problémával találkozom, bár a debug-olás ott is majdnem soronként megy. Lényeg, hogy az időt kitöltsem. 16:29 - 16:54 percig, azaz 25 percig kellett írnom egy néhány soros perl scriptet.

Végül a Perl WinInet library-je kihúzott annyira a szarból úgy, hogy a fejem már kilátszik.

Íme az ugyanazt megvalósító script WinInet32-vel

	use Win32::Internet;
	$INET = new Win32::Internet();
	$INET->Pasv(1);
	$INET->FTP($FTP, "***************", "**********", "***********");
	$FTP->Ascii();
	$FTP->Cd("/public_html/********/*******");
	$FTP->Put($ARGV[0],$ARGV[1]);
	$FTP->Close();

	print "$ARGV[0] $ARGV[1]";

Így a végére, leírva ezt, természetesen már el is ment a kedvem a mai honlapszerkesztéstől, mert tudom, mi vár rám. Így most már nagyra becsülök bármilyen honlapot, amit meglátok. Kíváncsi vagyok, egy HUP portálrendszert mennyi idő alatt írnék meg.
A kérdés inkább az: befejezném-e ebben az életemben?