DoGlatemLive
Cadet 2nd Year
- Registriert
- Dez. 2010
- Beiträge
- 19
Hallo Community,
ich hänge nun schon seit ein paar Stunden an einem Problem und hoffe ihr könnt mir dabei behilflich sein.
Habe folgendes Script:
Mit ein bisschen zusätzlicher Installation zuvor bekomme ich, wenn ich folgenden Befehl in die Linux Shell eingebe (voraussetzung richtiges Directory) "./IPtoLocation.pl 8.8.8.8", die Location der IP, genauer die Stadt. Die IP ist hier leicht zu erkennen, nämlich 8.8.8.8 .
Jetzt möchte ich, das es mir das Ergebnis automatisch, am besten als Variable, an eine andere Perl-Datei weiterleitet.
Gefunden habe ich das system() command und STDOUT. Hab damit die ganze Zeit herumgetestet. Einen Fehler meldet mir das Script nicht, allerdings gibt es wieder nur die Stadt in der Shell aus und fügt sie nicht in das andere Script ein.
Ich hoffe ihr könnt mir hier etwas aushelfen
Mit freundlichen Grüßen
Mike
ich hänge nun schon seit ein paar Stunden an einem Problem und hoffe ihr könnt mir dabei behilflich sein.
Habe folgendes Script:
Code:
#!/usr/bin/perl
use lib "Geo-IP-1.38/lib/";
use Geo::IP;
my $gi = Geo::IP->open( "GeoLiteCity.dat", GEOIP_STANDARD );
my $r = $gi->record_by_name($ARGV[0]);
if ($r) {
print join( "\n",
$r->city)
. "\n";
}
else {
print "Location of this IP Address is NOT defined !\n";
}Mit ein bisschen zusätzlicher Installation zuvor bekomme ich, wenn ich folgenden Befehl in die Linux Shell eingebe (voraussetzung richtiges Directory) "./IPtoLocation.pl 8.8.8.8", die Location der IP, genauer die Stadt. Die IP ist hier leicht zu erkennen, nämlich 8.8.8.8 .
Jetzt möchte ich, das es mir das Ergebnis automatisch, am besten als Variable, an eine andere Perl-Datei weiterleitet.
Gefunden habe ich das system() command und STDOUT. Hab damit die ganze Zeit herumgetestet. Einen Fehler meldet mir das Script nicht, allerdings gibt es wieder nur die Stadt in der Shell aus und fügt sie nicht in das andere Script ein.
Ich hoffe ihr könnt mir hier etwas aushelfen
Mit freundlichen Grüßen
Mike
Zuletzt bearbeitet:
