8 Jun
2006
8 Jun
'06
11:55
hi Bin grad ins metalab gefahren und werd da wohl bis zum Abend bleiben, also wenn mich wer mit go-spielen, interessanten gespr�chen oder so vom programmieren oder �hnlichem Abhalten will: kommt her. gruss mihi -- /usr/bin/perl -e '1==$#ARGV||die "usage: $0 <iPod Volume> <searchstring>"; open(D,"$ARGV[0]/iPod_Control/iTunes/iTunesDB")||die $!;$_=join "",<D>; s/\:/\//g;s/[^\w \.\/]//g;foreach(split /mh(it|sd)/){if(/$ARGV[1]/){ s/.*mhod.//;system("open \"$ARGV[0]$_\"")}}; # TO COPY IS OUR RIGHT!'