diff options
| author | Olivier Blin <oblin@mandriva.org> | 2005-07-05 06:51:24 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.org> | 2005-07-05 06:51:24 +0000 |
| commit | a8bfa611db05cc1f63b8e3b2cd1b7fe906ddeb86 (patch) | |
| tree | c4ebe71408a94dbfb9b107368c1f9db0f474cf20 /perl-install/standalone/drakhosts | |
| parent | b550f48fe108f6b80669d52c2d494dc40c065cb6 (diff) | |
| download | drakx-backup-do-not-use-a8bfa611db05cc1f63b8e3b2cd1b7fe906ddeb86.tar drakx-backup-do-not-use-a8bfa611db05cc1f63b8e3b2cd1b7fe906ddeb86.tar.gz drakx-backup-do-not-use-a8bfa611db05cc1f63b8e3b2cd1b7fe906ddeb86.tar.bz2 drakx-backup-do-not-use-a8bfa611db05cc1f63b8e3b2cd1b7fe906ddeb86.tar.xz drakx-backup-do-not-use-a8bfa611db05cc1f63b8e3b2cd1b7fe906ddeb86.zip | |
perl_checker fix
Diffstat (limited to 'perl-install/standalone/drakhosts')
| -rw-r--r-- | perl-install/standalone/drakhosts | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/drakhosts b/perl-install/standalone/drakhosts index 2cf717cca..55736f173 100644 --- a/perl-install/standalone/drakhosts +++ b/perl-install/standalone/drakhosts @@ -58,7 +58,7 @@ sub get_host_data { # 127.0.0.1 localhost.localdomain localhost # 10.0.1.253 guibpiv.guibland.com foreach (cat_($HOSTS)) { - my ($ip, $name, $alias) = $_ =~ /^(\d\S*)\s+(\S*)\s+(.*)$/; + my ($ip, $name, $alias) = /^(\d\S*)\s+(\S*)\s+(.*)$/; $ip and push @listhosts, { ip => $ip, hostname => $name, |