Übertragung der Messwerte mit FTP

Die mit der MessPC Software erzeugten Grafiken (siehe HTTP) lassen sich mit einem einfachen Script auf einen externen Server übertragen. Damit ist die Veröffentlichung z.B. im Internet möglich, ohne dass der MessPC Rechner von aussen erreichbar sein muss.
Der Perl Script kann auf einem beliebigen Rechner im internen Netz installiert sein und wird regelmässig über Crontab oder den Windows Scheduler gestartet, ruft die Grafik über HTTP vom MessPC System ab und übertragt sie per FTP z.B. zum externen Webserver.
Der Port 9999 wird standardmässig vom eingebauten Webserver des MessPC Systems verwendet und sollte bei Änderungen der MessPC Konfiguration entsprechend angepasst werden.

#! /usr/bin/perl -w
#
# http2ftp.pl
#
# Beschreibung:
# Der Script holt eine mit der MessPC Software erzeugte Grafik
# und uebertraegt sie auf einen externen FTP-Server.
#
# (c) Roberto Ziera, ziera@cubus.de
#
# 04.10.2004 - v1.0
#
use strict;
use LWP::Simple;
use Net::FTP;

###############################################################
# Einstellungen
###############################################################

my $url      = "http://192.168.10.11:9999/pcmeasure.jpg";
my $file     = "/tmp/pcmeasure.jpg";
my $ftphost  = "your.ftp.host";
my $username = "yourusername";
my $password = "yourpassword";
my $dirname  = "yourdirectory/subdirectory";

###############################################################
# Datei vom MessPC System holen
###############################################################
my $cc = getstore($url,$file);
if ($cc == "200") {
###############################################################
# ... und auf den FTP-Server uebertragen
###############################################################
my $ftp = Net::FTP->new($ftphost) or die "Verbindung fehlgeschlagen: $@\n";
$ftp->login($username, $password) or die "Anmeldung fehlgeschlagen.\n";
$ftp->cwd($dirname) or die "Verzeichniswechsel nicht moeglich.\n";
$ftp->type("I") or die "Wechsel in Binaermodus nicht moeglich.\n";
$ftp->put($file) or die "Datei konnte nicht uebertragen werden.\n";
$ftp->quit or warn "Verbindung konnte nicht beendet werden.\n";
} else {
print "Fehler beim Abholen: $cc\n";


Die Datei pcmeasure.jpg ist natürlich nur ein Beispiel. Alle von der MessPC Software bereitgestellten Grafiken können verwendet werden.








































Kontakt: better networks  Lutz Schulze  Hauptstrasse 34
01909 Grossharthau-Bühlau - mehr Infos im Impressum
Tel. 035954 53396        Fax 035954 53397
support@messpc.de bestellung@messpc.de
Die Zeitschrift 'IT-Administrator' hat das MessPC System getestet und einen mehrseitigen Bericht veröffentlicht.