User since
2004-08-20
16
Artikel
BenutzerIn
Guten Morgen Miteinander,
kennt jemand ein Perlmodul, mit dem sich die Konfigurationsdatei dhcpd.conf eines Linux-DHCP-Servers nach den eingetragenen Rechnernamen parsen lässt ?
Bzw. würde mir auch ein Regulärer Ausdruck weiterhelfen,
der mir den Rechnernamen aus der folgenden Beispielskonfig heraus parst.
-------------------------------------------
host w4de3csy0000006 {
hardware ethernet 00:55:66:77:88:99;
fixed-address w.x.y.z;
option host-name "w4de3csy0000006";
}
----------------------------------------------
Kann wir hier jemand helfen ?
Vielen Dank
Torsten
User since
2005-01-17
14760
Artikel
Admin1
Was brauchst du? Den host-name?
#!/usr/local/bin/perl
use strict;
my @hosts = ();
open( F, './dhcp.conf') or die "$!";
foreach my $s ( <F> ) {
my ($hostname) = $s =~ /\s+host-name\s+"?([^;"]+)"?;/;
push @hosts,$hostname if defined $hostname;
}
close ( F );
print "Rechner: \n", join( "\n", @hosts);
1;
User since
2004-08-20
16
Artikel
BenutzerIn
genau,
Vielen Dank. es hat funktionert.
Torsten