Archive for the './code' Category

[Perl] Socks5/Proxy list Checker

Mai 10, 2009
  1. #!/usr/bin/perl
  2. #Socks/Proxy Checker!
  3. use IO::Socket;
  4. print qq „
  5. ~~~~~~~~~~~~~~~~~~~~~~~
  6. Socks5 Checker\n
  7. by Blacky\n
  8. Usage $0 liste timeout goodput badput timeout\n
  9. Usage $0 list.txt proxylist.txt dontwork.txt 3\n
  10. ~~~~~~~~~~~~~~~~~~~~~~~
  11. „;
  12. my $liste = $ARGV[0];
  13. my $working = $ARGV[1];
  14. my $notwork = $ARGV[2];
  15. my $timeout = $ARGV[3];
  16. chomp($working);
  17. chomp($notwork);
  18. chomp($timeout);
  19. open (proxylist, „>>$working“) or print „Protokoll Datei nicht gefunden\n“;
  20. open(notw, „>>$notwork“) or print „Keine Datei angegeben!\n“;
  21. open(liste, „<$liste“) or print „Keine Proxy Liste!\n“;
  22. while(<liste>) {
  23. print „Prüfe…\n“;
  24. $proxys = $_;
  25. chomp($proxys);
  26. @list = split(/:/, $proxys); # Trenne IP:PORT
  27. $try = IO::Socket::INET->new (
  28. PeerAddr => $list[0],
  29. PeerPort => $list[1],
  30. Timeout => $timeout, #sek?
  31. );
  32. if ($try) {
  33. print „Verbindung zu $list[0] auf $list[1] erfolgreich\n“;
  34. print proxylist „$list[0]\:$list[1]\n“;
  35. }
  36. else
  37. {
  38. print „Verbindung zu $list[0] auf $list[1] fehlgeschlagen!\n“;
  39. print notw „$list[0]\:$list[1]\n“;
  40. }
  41. }
Usage sollte alles erklären 😉
Viel Spaß Damit!
Werbeanzeigen

Clipboard – simple desktop notice

April 30, 2009

Huhu,

Da ich früher mal Visual Basic Programmierte(Ich Programmiere gerne Krankheiten ;D), und es einfach mal wieder „tun“ wollte, habe ich mir die „Linux Variante“ Gambas angeschaut. Bei Gambas handelt es sich um eine VB Ähnliche Basic Sprache (Dialekt). Als kleines start Projekt, habe ich mir einen Text Cliper zusammengebastelt. Ich taufe ihn „Clipboard“.

clipboard bild

Clipboard in Aktion 😉

Installation:

Für Debian oder Ubuntu User, einfach das *.deb Package mit dpkg installieren

http://localhostr.com/files/36276b/clipboard_v0.0.1_i368_linux_debian.deb

$ dpkg -i clipboard_v0.0.1_i368_linux_debian.deb

Die Software ist danach (Gnome und KDE) unter „System“ auffindbar.

Für andere Distributionen kann ich Portierungen vornehmen, oder euch die tar.gz anbieten.

http://localhostr.com/files/431ce2/clipboard_v0.0.1_i368_linux_debian.tar.gz

Auf großartiges Eye Candy habe ich verzichtet, wer Bugs findet, oder Wünsche hat, kann sich gerne melden.

Steht natürlich unter der GPL 😛

Insgesamt ist Gambas ganz nett, von der IDE kann es mit Visual Basic 6 und Co mithalten, wobei es viele neue Funktionen wie das Programmieren von CGI Webanwendungen bietet. Die Syntax abweichungen sind wirklich gering und es ist leicht wieder einzutauchen  Für Leute welche mal etwas „quick’n dirty“ unter Linux verwirklichen wollen, gut geeignet.

Wobei ich Perl, doch mehr mag 😛

GreeZ!