ichhatteeinenstreit…

Wed, 19 May 2010 13:15:20 +0000

ichhatteeinenstreitmitmeinerleertasteundjetztredenwirnichtmehrmiteinander

(via IRC)

Arm

Fri, 12 Feb 2010 14:30:25 +0000

Nenne dich nicht arm, weil deine Träume nicht in Erfüllung gegangen sind; wirklich arm ist nur, der nie geträumt hat.

Marie von Ebner-Eschenbach

automatisch eigene Tweets speichern

Sat, 06 Feb 2010 15:23:36 +0000

Nachdem ich in Alte Tweets speichern/sichern beschrieben habe,
wie man seine bisherigen Tweets speichern kann,
kam bei mir danach die Anforderung automatisiert meine Täglich neuen Tweets hinzu zu fügen.

Ich wolle also ein Script haben,
das einmal am Tag die eigenen Tweets aus twitter zieht und abspeichert.
Also habe ich das alte Script angepasst.
Ergebnis ist folgendes:

#!/usr/bin/perl

require Encode;
use Net::Twitter;
use strict;

my $nt = Net::Twitter->new(
username => "TWITTERNAME",   #Durch Twitternick ersetzten
password => "TWITTERPASSWORT" #Durch Twitterpasswort ersetzen
);
my $pfad = "/pfad/zum/script/verzeichnis"; #Bitte durch eigenens Verzeichnis ersetze

#Ab hier nichts mehr ändern

open(LASTTWEET, "< $pfad/last_own_tweet.id") || die "Datei nicht gefunden\n";
my @IN = ;
my $lastid = $IN[0];
close(LASTTWEET);

eval {
my $statuses = $nt->user_timeline({ count => 150, since_id => $lastid});
#for my $status ( @$statuses ) {
for (my $i=(@$statuses-1);$i >= 0;$i--){
my $status = @$statuses[$i];
print Encode::encode_utf8("$status->{created_at} $status->{time} < $status->{user}{screen_name}> $status->{text}\n");
if( $status->{id} > $lastid)
{
$lastid = $status->{id};
}
}

open(LASTTWEET, ">$pfad/last_own_tweet.id");   # Datei zum Schreiben öffnen
print LASTTWEET "$lastid";  # Datei schreiben
close(LASTTWEET);

};
if ( my $err = $@ ) {
die $@ unless blessed $err && $err->isa('Net::Twitter::Error');

warn "HTTP Response Code: ", $err->code, "\n",
"HTTP Message......: ", $err->message, "\n",
"Twitter error.....: ", $err->error, "\n";
exit;
}
else { exit; }

In dem Script müssen am Anfang die Variablen einmal richtig gesetzten werden (wie Twitternick etc.).
Desweiteren muss die datei “last_own_tweet.id” im Scriptverzeichnis angelegt werden,
und mit der ID des Tweets befüllt, bei dem das ganze Beginnen soll.

Der erste Biss

Mon, 01 Feb 2010 09:57:29 +0000

nichts geht über den ersten biss in ein frisches stück brot mit ner guten salami, selbst der zweite biss kann da nur schwer mithalten

Twitter on ohneKontur – der Blog

ichhatteeinenstreit…

Arm

automatisch eigene Tweets speichern

Der erste Biss