-3

我得到了这个 file1.csv 文件，其中包含大量网络接口数据（大约 1000 个），我必须创建网络接口文件，如 ifcfg-lo:x 文件。

file1.csv 文件内容如下：

Hostname        Loop_back_ip        netmask                    interface

localhost1     192.168.1.10         255.255.255.255         lo:116

所以脚本应该从 file1.csv 文件中读取内容并创建接口文件：

文件名 = ifcfg-lo:116

文件内容：

DEVICE=lo:116

IPADDR=192.168.1.10

NETMASK=255.255.255.255

NETWORK=192.168.1.0

BROADCAST=255.255.255.255

ONBOOT=yes

NAME=loopback
4

1 回答 1

0

我昨天试过了，我非常接近解决方案。研究互联网，我制作了一个 perl 脚本，并能够通过从 csv 文件中提取数据来创建多个接口。

但是我看到了一个小问题，无法弄清楚为什么文件中会出现额外的字符。

以下是代码：

#!/usr/bin/perl
use strict;
use warnings;

sub main
{
        # Note: this could be a full file path
        my $filename = "file1.csv";

        open(INPUT, $filename) or die "Cannot open $filename";

        # Read the header line.
        #my $line = <INPUT>;
        my $line;

        # Read the lines one by one.
        while($line = <INPUT>)
        {
                chomp($line);

                # Display the header, just to check things are working.

                my ($hostname, $ip, $netmask, $interface) = split(',', $line);
                print "$hostname $ip $netmask $interface\n";


                {
                        if( -d "/var/tmp/$hostname")
                        {
                                open(EF, ">/var/tmp/$hostname/ifcfg-$interface") or die "writing /var/tmp/$hostname/ifcfg-$interface\n";
                                print EF "DEVICE=$interface\n";
                                print EF "IPADDR=$ip\n";
                                print EF "NETMASK=$netmask\n";
                                print EF "NAME=loopback\n";
                                print EF "BOOTPROTO=none\n";
                                print EF "TYPE=Ethernet\n";
                                print EF "ONBOOT=yes\n";
                                close EF;
                        }
                        else
            {
                                system ("mkdir /var/tmp/$hostname");
                                open(EF, ">/var/tmp/$hostname/ifcfg-$interface") or die "writing /var/tmp/$hostname/ifcfg-$interface\n";
                                print EF "DEVICE=$interface\n";
                                print EF "IPADDR=$ip\n";
                                print EF "NETMASK=$netmask\n";
                                print EF "NAME=loopback\n";
                                print EF "BOOTPROTO=none\n";
                                print EF "TYPE=Ethernet\n";
                                print EF "ONBOOT=yes\n";
                                close EF;
                        }
                }

        }

        close(INPUT);
}

main();

因此，在执行脚本后，它会创建文件为：

-rw-r--r-- 1 root root 112 Jul 24 10:09 ifcfg-lo:20
-rw-r--r-- 1 root root 112 Jul 24 10:09 ifcfg-lo:21
-rw-r--r-- 1 root root 112 Jul 24 10:09 ifcfg-lo:22
-rw-r--r-- 1 root root 112 Jul 24 10:09 ifcfg-lo:23

当我“cat”文件进行显示时，它没有显示任何问题：

$> cat ifcfg-lo:20
DEVICE=lo:20
IPADDR=A.B.C.D
NETMASK=255.255.255.255
NAME=loopback
BOOTPROTO=none
TYPE=Ethernet
ONBOOT=yes

但是当我“vi”进入文件时，我会看到一个额外的字符（^M），我能够弄清楚它来自哪里以及它在我创建的每个文件中：

$> vi ifcfg-lo:20

DEVICE=lo:20^M
IPADDR=A.B.C.D
NETMASK=255.255.255.255
NAME=loopback
BOOTPROTO=none
TYPE=Ethernet
ONBOOT=yes
于 2013-07-24T14:24:59.080 回答