Monats-Archive: April 2008

Folgendes Perl-Script konvertiert alle Hexadezimalen Zahlen (0x…) der Standardeingabe (stdin) in Dezimale Zahlen und gibt es auf der Standardausgabe (stdout) aus: #!/usr/bin/perl -lw use strict; while () { chomp; s/0[xX]([a-fA-F0-9]+)/sprintf(‘%d’, hex(’0x’.$1))/eg; print $_; } Benutzung in etwa wie folgt: perl … Weiterlesen →

Um in einer VB6-Routine (Function, Sub oder Property) mehrere Fehler ordentlich abzufangen muss eine etwas merkwürdige Kombination von “on local error” und “resume” verwendet werden. Diese Beispiel-Sub geht von einem simplen “Form1″-Formular sowie einem “Command1″-Button aus. Das Beispiel versucht mehrere … Weiterlesen →