Opened by heinzelman at 2008-04-21 01:11
User since
2008-04-21
1 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2008-04-21
1 Artikel
BenutzerIn
Hallo Leute,
ich versuche mit einem Script folgende Textdatei auszulesen:
Die Werte möchte ich splitten und in separaten Variablen speichern:
Allerdings stecke ich hier fest und komme nicht weiter... Das script gibt mir bei "print $temp;" nichts zurück... Kann mir hier jemand weiterhelfen?
Vielen Dank!
ich versuche mit einem Script folgende Textdatei auszulesen:
Die Werte möchte ich splitten und in separaten Variablen speichern:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#!/usr/bin/perl
my $config_file="cfg.txt";
open(config, $cfg_file);
flock(config, 2);
LINE: while(<config>) {
chomp;
next LINE if(/^$/); #Skip blank lines
my ($HOSTNAME,$IP) = split(/|/);
my $temp = {HOSTNAME => $HOSTNAME,IP => $IP};
next LINE;
}
print $temp;
Allerdings stecke ich hier fest und komme nicht weiter... Das script gibt mir bei "print $temp;" nichts zurück... Kann mir hier jemand weiterhelfen?
Vielen Dank!