Anti-Spam E-Posta Adresi Oluşturma (Şifreli IP Adresiyle)

Bugün Perl Rahipleri tapınağında okuduğum ve spam e-posta konusu ile ilgili bu önemli makaleyi ve Perl kodunu sizinle paylaşmak istedim.

Eğer bir şekilde web sayfanızda e-posta adresinizi yayınlamak istiyorsanız yukarıdaki makaledeki Perl betiğini (script) kullanarak oluşturacağınız dinamik bir e-mail adresinin içine o anda sizin e-posta adresinizi çekmeye çalışan robota ya da spamciye dair bilgileri gömebiliyorsunuz. Nasıl yani diyenler okumaya devam edebilir ;-)

Yani benimadresim-spamcinin_sifrelenmis_IP_ve_zaman_bilgisi@mydomain.com gibi bir adres üretiliyor dinamik olarak. Eğer qmail gibi benimadresim-hedehodo@mydomain.com şeklindeki adresleri benimadresim@mydomain.com adresinize yönlendirme yeteneğine sahip bir e-posta sunucusu üzerinde iseniz size gelen spam postadaki To: alanına bakarak ve bunu çözerek (deşifre ederek) hangi IP tarafından ne zaman çekilmiş olduğunu öğrenebiliyorsunuz. Bu arada sözkonusu bilgilerin şifrelenmesi için Blowfish şifreleme algoritması kullanılıyor.

İlgili Yazılar

Perl ve Prolog ile mantık programlama

FZ
20 Aralık 2005, 1 dakika okuma süresi

Daha önce sık sık DSL (Domain Specific Language) yani alana özgü mini dillerin işleri nasıl kolaylaştıracağından bahsetmiştik.

Elindeki çekice bakıp her şeyi çivi olarak görmek yerine bilgisayar bilimlerinin ışığında çeşitli problemler için uygun çözümleri geliştirmeyi bilen yazılım uzmanlarının hoşuna gidebilecek bir makale çıktı O'Reilly Networks ortamında.

Perl 20. Doğum Günü ve Perl 5.10 Çıktı

anonim
23 Aralık 2007, 2 dakika okuma süresi

Geçtiğimiz günlerde Perl'in 20. yaşgünü tüm dünyada coşku ile kutlandı. Doğum gününden 1 gün önce Perl Vakfı Perl 5.10'u duyurdu.

Perl 5.10 da görünen en önemli değişiklik smart match operator. Bir tür karşılaştırma yapmamıza yarayan operatör array içinde aradığımız scalar değeri bulmamızı sağlıyor. Yeni operatörümüz: "~~". Örnek vermek gerekirse $needle scalarimizi array @haystack içinde arıyorsak, kolayca yeni operatörümüzü kullanıyoruz.

if ($needle ~~ @haystack) ...

Sonuç olarak artık Perl'de tüm kaşılaştırmalar doğru şeyi yapmamızı sağlıyor.

Perl Öğreniyoruz - 1

butch
23 Nisan 2002, 9 dakika okuma süresi

Haydi millet toplanın. Perl öğrenmeye başlıyoruz :) Bundan sonra düzenli olarak bu köşede Can Uğur Ayfer tarafından hazırlanan Perl Öğreniyoruz makaleleri yayınlanacak. Bu makalelerde, klasik yöntemle, basit problemleri adım adım çözerek beraberce Perl öğreneceğiz. Buyrun ilk derse...

(Can Uğur Ayfer, Kim Korkar Unix`den, Perl ve MySQL ile Cgi Programlama gibi kitapların yazarı, 1973 yılından beri ülkemizde bilgisayar sektörünün duayenlerinden birisidir. Halen aktif olarak çalışmakta öğrenmeye, öğretmeye aynı coşku ile devam etmektedir. Kendisine sonsuz teşekkürler)

Visual Perl, Visual Python

gencbeyin
29 Ekim 2001, 1 dakika okuma süresi

Microsoft Visual Studio .NET için editör, grafik arındırıcı, dil deyimleri (regular expression) kontrolü ve XML Web servisleri programlama gibi özellikleri bulunan Visual Perl ve Visual Python 22.Ekim'de Los Angeles'da Active State'in kurucusu Dick Hardt tarafından Microsoft Professional Developers Conference'da ilan edildi. Yazıldıktan sonra her türlü platformda kullanılabilecek türden kod oluşturan geliştirme ortamı ilk üçüncü parti programlama dili paketi olarak nitelendirildi.

Windows için ideal Perl ortamı

sundance
20 Mayıs 2001, 1 dakika okuma süresi

Uzun zamandır Perl için Windows ortamında güzel bir Entegre Yazılım Geliştirme ortamı arıyordum, sonunda buldum Open Perl Ide

Gerek debug özellikleri ile gerekse editörünün sağladığı kolaylıklar ile gerçekten dört dörtlük bir Perl geliştirme ortamı, herkese tavsiye ederim.