Perl - Site Değiştiğinde Haberdar Olmak

[Feuer]

programın olayı kısaca, sitede değiştiğinde haberdar olmak istediginiz bir yazı varsa işte offline değiştiginde yada bi deger 192039 degeri değiştiginde haberdar olmak istiyorsanız bu scripti kullanabilirsiniz :S




#!/usr/bin/perl
$dongu = 0;
while () {
my $gonder = 'siteninismi';
use LWP::Simple;
my $kitap = get $gonder;
die "Couldn't get $url" unless defined $kitap;

if($kitap =~ m/buraya degistiginde ogrenmek istediginiz icregi yazin/i) {
print "Gelmedi.n";
}
else {
print "Geldi.n";
exec("C:/Perl64/ali.bat");
}

$dongu ++;
sleep(30)
}

ali.bat

start chrome http://www.youtube.com/watch?v=xh40QxwZz7Q

[Meov]

Bu bununsa bunu banlayalım ahsashuda

[Deacon]

hahahahahahh

[Meov]

ee kimse şunu trollemeyecek mi?

o kadar tespitte bulundum dalga geçmeyecek miyiz :/

[aquila]

Hayir.

[pontipati]

said:

dün connected2 me için yazdım 95li bi çıtır vardı.

dedi ben online oldugumda bana ilk yazan sen olursan camera açıcam" dedi. :S

sonra rus savunma bakanının kızı cam açtı

[moriarty]

allah açlıkla sınamasın arkadaş. nelere yöneltiyo insanı

[Feuer]

Meov said:

ee kimse şunu trollemeyecek mi?

o kadar tespitte bulundum dalga geçmeyecek miyiz :/

gel trolle :S

yalnız ben gorelara asılıyorum ona göre :S

[Fly]

su smileyi yanlis yerde kullanani bogazlamak istiyorum

[haydari]

senin adın bundan sonra ali bat olsun