no way to compare when less than two revisions
Unterschiede
Hier werden die Unterschiede zwischen zwei Versionen angezeigt.
— | adminstoriesidenticaviaperl [20120813 13:13] (aktuell) – angelegt Dirk Deimeke | ||
---|---|---|---|
Zeile 1: | Zeile 1: | ||
+ | ====== identi.ca via Perl ====== | ||
+ | * Urspruenglicher Autor: Dirk Deimeke | ||
+ | * Urspruengliches Datum: 29.04.2011 | ||
+ | |||
+ | Die Kurznachrichtendienste, | ||
+ | |||
+ | Das kann man beispielsweise dazu nutzen, sich über den Ablauf eines lang laufenden Skriptes informieren zu lassen. | ||
+ | |||
+ | Um das zu bewerkstelligen, | ||
+ | |||
+ | Bei aelteren Modulen leistet das folgende kleine Perlscript das Gewuenschte (username und passwort muessen angepasst werden): | ||
+ | |||
+ | <code perl># | ||
+ | use strict; | ||
+ | use Net:: | ||
+ | |||
+ | if ( $#ARGV == 0 ) { | ||
+ | my $ident = Net:: | ||
+ | my $result = $ident-> | ||
+ | } else { | ||
+ | print " | ||
+ | print "$0 nachricht\n\n"; | ||
+ | print " | ||
+ | wenn sie aus mehreren Worten besteht.\n\n"; | ||
+ | }</ | ||
+ | |||
+ | Bei neueren Modulen muss das unten stehende Format verwendet werden (ungetestet!), | ||
+ | |||
+ | <code perl>my $ident = Net:: | ||
+ | username => " | ||
+ | |||
+ | Der Aufruf erfolgt dann mittels: ''/ | ||
+ | |||
+ | [[adminstoriesartikel|Zurück zur Uebersicht]] |