Opened by WolverineJ at 2008-06-26 13:05
User since
2008-06-26
2 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2008-06-26
2 Artikel
BenutzerIn
Hallo Community,
als Perl-Anfänger möchte ich aus einem Projekt heraus ein Perl-Skript schreiben, welches Daten von einem Solaris-Host aus dem Filesystem zu einem Windows 2003 - Server kopieren soll. Dies soll mittels SCP funktionieren.
Also habe ich mir in meiner ActivePerl-Umgebung über den Package Manager folgende Pakete geladen:
- Net-SCP 0.06
- Net-SSH 0.08
Mittels SSH-Key-Exchange ist es mir bereits möglich ohne Passworteingabe von dem Windows-Server auf den Solaris-Server zuzugreifen (mittels PutTy).
Nun hänge ich bei dem folgenden Skript und drehe mich im Kreis:
Das Skript läuft augenscheinlich ohne Fehler durch. Jedoch erscheint die Datei nicht auf dem Windows-Server.
Kann mir jemand einen Tipp geben, wo mein Fehler liegt?
Danke!
als Perl-Anfänger möchte ich aus einem Projekt heraus ein Perl-Skript schreiben, welches Daten von einem Solaris-Host aus dem Filesystem zu einem Windows 2003 - Server kopieren soll. Dies soll mittels SCP funktionieren.
Also habe ich mir in meiner ActivePerl-Umgebung über den Package Manager folgende Pakete geladen:
- Net-SCP 0.06
- Net-SSH 0.08
Mittels SSH-Key-Exchange ist es mir bereits möglich ohne Passworteingabe von dem Windows-Server auf den Solaris-Server zuzugreifen (mittels PutTy).
Nun hänge ich bei dem folgenden Skript und drehe mich im Kreis:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
use warnings;
use Sys::Hostname;
use Net::SCP qw(scp);
$hostname="XXX";
$username="xxx";
$source="/dir/file";
$destination="C:\\dir2";
$scp = Net::SCP->new("$hostname");
$scp->login("$username");
$scp->get("$source","$destination");
Das Skript läuft augenscheinlich ohne Fehler durch. Jedoch erscheint die Datei nicht auf dem Windows-Server.
Kann mir jemand einen Tipp geben, wo mein Fehler liegt?
Danke!