紧急求助!!!(分别用Shell和Perl实现)

xsco505

紧急求助!!!
现有一个输入文件如下:
January 24, 2000   VSAT Configuration for VSAT 26432-2315                 Page: 1

******************** VSAT Configuration ********************
Name: 26432-2315   CPA: 2315           Network: Schwans

** General Parameters **
Company Name     Schwans                          Main VSAT Delay       174
Group/Division   COAL VALLEY IL                   Backup VSAT Delay     174
Street Address   HWY 150 R.R. 1 BOX 170-C         Antenna Manufacturer  PRODELIN
City             ORION                            Antenna Size          1.2
State            IL                               Transmitter Model     KU-500
Country          USA                              Transmitter Serial #  
Postal Code      61273                            Receiver LNB Model   
Special Notes                                     Receiver LNB Serial #
Contact Fst Name JACKIE                           IDU Model            
Contact Lst Name WOOSLEY                          IDU Serial Number     
Phone            309-526-3321                     Install Date          Dec 31 69 18:00
Longitude        -90:25                           DeInstall Date        Dec 31 69 18:00
Latitude         41:21                            Site ID Code         

** Physical Parameters **
Number Of Ports     7                             Hardware Version    5
Memory Size         4                             Software Version    2
Flash Prom Mode     DISABLED                      Software Revision   1

** Hub Connection Parameters **
Connected HPP Id    21
HPP Link Number     2
HPP Link Card       2
HPP Link Port       4
Connected HSP Id    81
HSP Link Number     2

** ADA Parameters **
Rate Of Traffic Switch          OFF               -UDP Rate Of Traffic Fields-   
Request Data Rate               5                 UDP Rate Of Traffic Switch      OFF
Request Data Time               5                 IP Address                      0.0.0.0
Release Data Rate               5                 UDP Port #                      0
Release Data Time               5                 Request UDP Data Rate           5
-X25 Fields-                                      Request UDP Data Time           5
Throughput Class Switch         OFF               Release UDP Data Rate           5
Throughput Class Mark           9600              Release UDP Data Time           5
Destination Address Switch      OFF               -IP Address & TCP Port # Fields-
Destination X121 Addresses                        IP Addess & TCP Port # Switch   OFF
-UDP Polling Fields-                              IP Address                      0.0.0.0
UDP Polling Switch              OFF               TCP Port #                      0
DA Request UDP Port #           1024
DA Release UDP Port #           1025
UDP Poll Timer                  30
UDP Poll Number                 2
January 24, 2000   VSAT Configuration for VSAT 26432-2315                 Page: 2

** Backbone Parameters **
Backbone Option          BACKBONE ENABLED         -Delay Timer-
Transmit Window          20                       Period                   45
Receive Window           5                        Unit                     Seconds
Hysteresis               40                       Dial Backup Period       240
Maximum Retry Count      2                        -Retry Timer-
Maximum Reestablishment  2                        Period                   5
-Idle Timer-                                      Unit                     Seconds
Period                   192                      -Optimization Parameters-
Unit                     Seconds                  Optimization Type        LOCAL
-Response Timer-                                  Local Window             12
Period                   119
Unit                     Seconds
Dial Backup Period       300

** Satellite Link Parameters **
-LAPU Link Messages (CONN/DISC)-                            Super Slot Size               16
T1L: Retransmission Timer     516                           Optimum Slots                 1
N1L: Retransmission Counter   1                             Minimum Slots                 1
-LAPU Data Messages-                                        -Congestion Parameters-
T1I: Retransmission Timer     12                            Retransmission Threshold 0    0
N1I: Retransmission Counter   10                            Retransmission Threshold 1    4
T3: Acknowledgement Timer     173                           Retransmission Threshold 2    7
-LAPU Idle Timers-                                          Retransmission Delay 0        0
T4R: Random Access            4136                          Retransmission Delay 1        6
T4D: Dedicated Access         1034                          Retransmission Delay 2        10
-Unreasonable Link Connects-                                Flow Frame Count              10
T5: Period                    1                             -Alarms-
N5: Counter                   250                           Outbound BER Alarm Threshold  100000
-Windows-                                                   DRO Offset Alarm Threshold    600
J: Transmit Window            31                            OB Freq Offset Alarm Thres    2700
L: Receive Window             40                            Free Buffers Alarm Threshold  5
-Link Establishment-                                        Free Buffers For Busy         3
Mode                          ENABLED                       CD Period                     3
Delay                         3                             -VSAT NG Parameters-
-Two Step Parameters-                                       Inbound Modulation            MSK
RA2 Step                      240                           Outbound Modulation           BPSK
DA2 Step                      240                           Outbound ID                   7F8
-Trace Levels-                                              NGRA2 Step                    240
LAPU                          0                             NGDA2 Step                    288
NLU                           0                             RA Inbound Rate               76800
-Rates-                                                     DA Inbound Rate               76800
Outbound Encoder Rate         1/2                           Reed Solomon                  Disabled
Inbound Rate                  19200                         Multiple Pkts per Time Slot   Disabled
Outbound Rate                 512000                        ODU Switching Day             65535
Time Slot Duration            3714                          ODU Switching Night           65535
-Random Access Maximum Frame Lengths-                       NO Link Reset Timer           60
Outbound                      600                           Delta MI                      0
Inbound                       307
-Dedicated Access Maximum Frame Lengths-
Outbound                      600
Inbound                       307
January 24, 2000   VSAT Configuration for VSAT 26432-2315                 Page: 3

** Voice Parameters **
Voice Feature       Disable                       Super Slot Size     *Invalid*
Coding Rate         6400                          Auto Dial Number    65535
Packts/Inbound Frm  3                             Incoming External   YES
Packts/Outbound Frm 3                             Incoming Internal   YES
Activity Detect Str Disable                       Outgoing External   YES
DA Utilization      16                            Outgoing Internal   YES
Input Amplifier     16                            Fax Transfers       YES
Output Amplifier    16                            Distance Learning   NO

** Transmitter Parameters **
Inbound Band Number      1                        Initial Frequency Offset 0
Initial Freq Jitter      0                        Transmitter Group Offset 0
-Main Frequencies (kHz)-                          -Backup Frequencies (kHz)-
Day Start                1184780                  Day Start                1184780
Day Stop                 1188500                  Day Stop                 1188500
Night Start              1184780                  Night Start              1184780
Night Stop               1188500                  Night Stop               1188500
Inbound Initial          1186580                  Inbound Initial          1186580
Inbound Reference        1182020                  Inbound Reference        1182020
Idle                     1132500                  Idle                     1132500

** Receiver Parameters **
Main Outbound System Number   7                   Backup Outbound System Number   7
Main Outbound Carrier         1                   Backup Outbound Carrier         1
Main Outbound Frequency       1138                Backup Outbound Frequency       1138

** Port Configuration **

Port: 1  Type: SDLC        Enabled: ON
** SDLC Port Parameters **
Baud Rate                                         Network Timeout            300
SDLC Type                  NORMAL                 Host Timeout               300
Physical DCE/DTE           DCE                    Data Poll Timer            30
Duplex Operation           FULL                   Control Poll Timer         60
Encoding Mode              NRZI                   Slow Poll Mode             NONE
Idle Character             FLAG                   Slow Poll Threshold        9
Transmit Packet Delay      0                      Disconnect Threshold       30
Maximum Frame Size         273                    Slow Poll Ratio            0
SDLC PAD Mode              TPAD                   SNRM Response Mode         IMMEDIATE
                                                  Pool Allocation            100%
January 24, 2000   VSAT Configuration for VSAT 26432-2315                 Page: 4

Port: 2  Type: Async       Enabled: ON
** Async Port Parameters **
-General Parameters-                                        -Asserted Invitation to Connect Signal-
X3 Profile Name                AT_COMM                      Assert DTR                     NO
Speed Sense Enable             NO                           Assert RTS                     NO
Baud Rate                      9600                         Assert DSR                     NO
Pad Type                       4                            Assert DCD                     NO
Data Forward Buffer            256                          Assert CTS                     NO
Maximum Message                256                          Assert RI                      NO
X121 Address                   2315                         -Sensed Invitation to Connect Signal-
Call Request Timer             120                          Sense DTR                      NO
Incoming Call Timer            5                            Sense RTS                      NO
Fast Select Acceptance         NO                           Sense DSR                      NO
Fast Select Channel Connect                                 Sense DCD                      NO
Operation Mode                 NORMAL                       Sense CTS                      NO
Broadcast Node Type            SOURCE                       Sense RI                       NO
Broadcast Call Initiation      USER INITIATED               -Raise Asserted Invitation to Connect Signal-
Host ID                        0                            On Packet Level Up             NO
Data Mode                      NORMAL                       Upon Incoming Call             NO
ISR Transmitter Buffer Size    8                            Upon Port Activation           NO
Autocall                       OFF                          
Autocall Address                                            AITC Number Of Pulses          3
Autocall Facilities                                         
Autocall User Data                                          All Active                     ONE OF EACH
Autocall Interval              0                            Assert Flow Ctl Signal         NONE
Parity                         8 BITS/NO PARITY             Sense Flow Ctl Signal          NONE
Stop Bits                      1 BIT                        -Asserted Flow Control Type-
-Broadcast Groups-                                          XON and XOFF                   NO
Broadcast Group Selection      SELECTED                     Asserted Signal                HIGH
Broadcast Group1               0                            -Sensed Flow Control Type-
Broadcast Group2               0                            XON and XOFF                   NO
Broadcast Group3               0                            Sensed Signal                  NEITHER
Broadcast Group4               0                            -Receive Handshake-
-Asserted Connection Signal-                                Sense DTR                      NO
Assert DTR                     NO                           Sense RTS                      NO
Assert RTS                     NO                           Sense DSR                      NO
Assert DSR                     YES                          Sense DCD                      NO
Assert DCD                     YES                          Sense CTS                      NO
Assert CTS                     YES                          Sense RI                       NO
Assert RI                      NO                           -Transmit Handshake-
-Sensed Connection Signal-                                  Assert DTR                     NO
Sense DTR                      YES                          Assert RTS                     NO
Sense RTS                      NO                           Assert DSR                     NO
Sense DSR                      NO                           Assert DCD                     NO
Sense DCD                      NO                           Assert CTS                     NO
Sense DCS                      NO                           Assert RI                      NO
Sense RI                       NO                           
-Raise the Connected Signal-                                XON Character                  17
On Detection of SITC           NO                           XOFF Character                 19
Upon Incoming Call             YES                          XOFF Retransmission Counter    4
Upon Port Activation           NO                           Bell Char                      7
Upon Call Acceptance           YES                          -X28 Session Options-
-Lower the Connected Signal-                                Enable Remote Commands         NO
On Clear Packet Reception      YES                          No Call/Clear Commands         NO
On Invitation To Clear         NO                           Send Reset to Network          NO
On User Clear                  YES                          Fast Select                    NO
On Expiration of VCET          NO                           No Protocol                    NO
-Connection Conditions-                                     Packet Size Negotiation        NO
January 24, 2000   VSAT Configuration for VSAT 26432-2315                 Page: 5
After PAD Asserted ACS         NO                           
After PAD Dropped SCS          NO                           Connection Timer               1
When Disconnected              YES                          Disconnect Wait Timer          5
When Connected                 NO                           Virtual Call Expiration Timer  120
                                                            Disconnect Response Timer      1
Connection Signal Behavior     RAISE AND LOWER ACS          -Raise the Call Connected Signals-
-Asserted Call Connected Signals-                           Upon Incoming Call             NO
Assert DTR                     NO                           Upon Call Acceptance           NO
Assert RTS                     NO                           -Lower the Call Connected Signals-
Assert DSR                     NO                           On Clear Packet Reception      NO
Assert DCD                     NO                           On Invitation to Clear         NO
Assert CTS                     NO                           On User Clear                  NO
Assert RI                      NO

Port: 3  Type: Ethernet    Enabled: ON
** Ethernet Port Parameters **
Promiscuous Mode             NORMAL               Default Gateway Address      0.21.0.24            Preference Level             0
Multicast All                ENABLE               Max Routing Entries          1024                 Route Discovery              DISABLED
MAC Address                  400023150003         -RIP-                                             Advertisement Interval       7
Max Frame Size               1518                 Route TTL                    600                  -ARP-                        
-LLC Profile-                                     RIP Satelite Interval        90                   Max ARP Entries              128
LLC Option                   DISABLED             RIP Local Interval           30                   ARP Retries                  4
Max Connections              10                   -RIP 1-                                           ARP Retry Timer              1
Reply Timer                  100                  Internal Listen              DISABLED             ARP TTL                      600
Max Retransmissions          12                   Internal Advertise           DISABLED             UDP Broadcast Option        DISABLED
Acks To Increment Win        30                   External Listen              DISABLED             UDP Bcast Group ID1         0
Max Outstanding I Packets    30                   External Advertise           DISABLED             UDP Bcast Group ID2         0
Receive Window Size          0                    -RIP 2-                                           UDP Bcast Group ID3         0
Inactivity Timer             5                    Supply                       DISABLED             UDP Bcast Group ID4         0
Received Ack Timer           75                   Listen                       DISABLED             UDP Bcast Group ID5         0
Network Connect Retry Intvl  0                    RIP 1 Compatible             FALSE                UDP Bcast Group ID6         0
Number Of Network Headers    0                    Authentication               DISABLED             UDP Bcast Group ID7         0
Maximum Control Messages     0                                                                      UDP Bcast Group ID8         0
Transmit Message Queue Size  3                    -IGMP-                                            -TCP SPOOFING-
Transmit Message Limit       3392                 Internal IGMP                DISABLED             TCP Spoofing                ENABLED
Control Queue Limit          30                   External IGMP                DISABLED             Connectivity                END_TO_END
Flow Control Time Limit      0                    IP Multicast Address1        0.0.0.0              Connection Type             ACTIVE
Outbound Regulator Threshld  655420               IP Multicast Address2        0.0.0.0              Control Counter             255
Local Regulator Max Threshd  0                    -Secondary IP Address-                            Network Timer               250
Local Regulator Min Threshd  0                    Secondary IP Interf Type1    SATELLITE            User Timer                  100
XID Response Interval        0                    Secondary IP Interf Type2    SATELLITE            Retransmission Timer        100
SABME Timer                  0                    Secondary IP Address1        0.0.0.0              Idle Timer                  15
Host Timeout                 0                    Secondary IP Address2        0.0.0.0              Transmit Timer              1
-IP Profile-                                      -ICMP Profile-                                    Max Station                 64
IP Option                    ENABLED              Advertisement Address        0.0.0.0              Station Threshold           16
IP Address                   10.102.65.1                                                            Txt Window Size             3000
SubNet Mask                  255.255.255.0                                                          Rcv Window Size             3000
Default Gateway Intrf Type   SATELLITE                                                              Max Buf Size                1460
                                                                                                    Device Queue Size           1024
                                                                                                    TCP MSS                     205
                                                                                                    Max Information Rate        64
                                                                                                    Distribution Interval       5
                                                                                                    Active Conn Threshold       20
January 24, 2000   VSAT Configuration for VSAT 26432-2315                 Page: 6

Port: 4  Type: SDLC        Enabled: OFF
** SDLC Port Parameters **
Baud Rate                                         Network Timeout            300
SDLC Type                  NORMAL                 Host Timeout               300
Physical DCE/DTE           DCE                    Data Poll Timer            30
Duplex Operation           FULL                   Control Poll Timer         60
Encoding Mode              NRZI                   Slow Poll Mode             NONE
Idle Character             FLAG                   Slow Poll Threshold        10
Transmit Packet Delay      0                      Disconnect Threshold       30
Maximum Frame Size         273                    Slow Poll Ratio            0
SDLC PAD Mode              TPAD                   SNRM Response Mode         IMMEDIATE
                                                  Pool Allocation            25%

Port: 5  Type: SDLC        Enabled: OFF
** SDLC Port Parameters **
Baud Rate                                         Network Timeout            300
SDLC Type                  NORMAL                 Host Timeout               300
Physical DCE/DTE           DCE                    Data Poll Timer            30
Duplex Operation           FULL                   Control Poll Timer         60
Encoding Mode              NRZI                   Slow Poll Mode             NONE
Idle Character             FLAG                   Slow Poll Threshold        9
Transmit Packet Delay      0                      Disconnect Threshold       30
Maximum Frame Size         273                    Slow Poll Ratio            0
SDLC PAD Mode              TPAD                   SNRM Response Mode         IMMEDIATE
                                                  Pool Allocation            25%

Port: 6  Type: SDLC        Enabled: OFF
** SDLC Port Parameters **
Baud Rate                                         Network Timeout            300
SDLC Type                  NORMAL                 Host Timeout               300
Physical DCE/DTE           DCE                    Data Poll Timer            30
Duplex Operation           FULL                   Control Poll Timer         60
Encoding Mode              NRZI                   Slow Poll Mode             NONE
Idle Character             FLAG                   Slow Poll Threshold        9
Transmit Packet Delay      0                      Disconnect Threshold       30
Maximum Frame Size         273                    Slow Poll Ratio            0
SDLC PAD Mode              TPAD                   SNRM Response Mode         IMMEDIATE
                                                  Pool Allocation            25%

Port: 7  Type: SDLC        Enabled: OFF
** SDLC Port Parameters **
Baud Rate                                         Network Timeout            300
SDLC Type                  NORMAL                 Host Timeout               300
Physical DCE/DTE           DCE                    Data Poll Timer            30
Duplex Operation           FULL                   Control Poll Timer         60
Encoding Mode              NRZI                   Slow Poll Mode             NONE
Idle Character             FLAG                   Slow Poll Threshold        10
Transmit Packet Delay      0                      Disconnect Threshold       30
Maximum Frame Size         273                    Slow Poll Ratio            0
SDLC PAD Mode              TPAD                   SNRM Response Mode         IMMEDIATE
                                                  Pool Allocation            25%

** Connections **

-- SDLC to SDLC --
Port  Station    Conn  Conn  Conn Station
      Address    CPA   Port  Address
January 24, 2000   VSAT Configuration for VSAT 26432-2315                 Page: 7

-- SDLC to IEEE 802.2 LLC --
Port  Station  PU Type  XID        Id Block   Conn  Conn  Local MAC    Remote MAC   Local SAP Remote SAP  Link
      Address           Generation Number     CPA   Port  Address      Address      Address   Address     Number
1     80       PU2.0    ENABLE     1723151    21    7,5   400023150001 400022160001 4         4           80

-- X25 to X25 --
Port  LCN        Conn  Conn  Conn LCN
                 CPA   Port         

-- Automatic and Hub Addressing --
Port  Local SAP Conn  Conn  Conn MAC      Conn SAP  Conn
      Address   CPA   Port  Address       Address   Type

-- Routes --
Route  Route      Gateway          Route           Route
CPA   Port      IP Address      IP Address     Subnet Mask
21     4,1                    10.100.0.2      255.255.255.0

-- Bisync to Bisync --
Port  Station    Conn  Conn  Conn Station
      Address    CPA   Port  Address

如今想按从中提取有用信息并按以下格式输出:
The VSAT Network Configuration Summary


Duration:                 87.125
RA Inbound Rate:         76800
Outbound Rate:                 512000
Inbound Modulation:         BPSK
Outbound Modulation:         MSK
Transmitter Model:           KU-500
Maximum Retry Count:          2
Buffers Alarm Threshold:5
Voice Feature:                 Disable
Longitude:                -90:25
Latitude:                 41:21
Phone:                        309-526-3321
其中右边一列数据是随便举的例子.这个网站高手如云,还望各位不吝赐教,谢谢啦!

torrent

哇，我想你可以诚聘斑竹帮你。  ：）

nkliyong

偶没看大明白你想做什么,能再说清楚点偶看看.

muzx

看得我头发晕，请问搂主，有什么规律吗？或者结果文件约束条件是什么？

deathcult

改一下$file，试试行么：

1. 
   
2. #!/usr/local/bin/perl
   
3. 
   
4. use strict;
   
5. 
   
6. my $file = "a";
   
7. my @keywords = ("Duration", "RA Inbound Rate", "Outbound Rate",
   
8.                         "Inbound Modulation", "Outbound Modulation",
   
9.                         "Transmitter Model", "Maximum Retry Count",
   
10.                         "Buffers Alarm Threshold", "Voice Feature",
    
11.                         "Longitude", "Latitude", "Phone");
    
12. 
    
13. foreach my $keyword(@keywords)
    
14. {
    
15.         foreach(`cat $file `)
    
16.         {       
    
17.                 print "$1:$2\n" if(/($keyword)( [^ ]+)/);
    
18.         }
    
19. }
    

复制代码

valentine 注：
这断程序中，两个foreach语句交换一下位置，效率会有明显改善，象这样：
foreach  (`cat $file `)
{
        foreach my $keyword(@keywords)
        {       
                print "$12\n" if(/($keyword)( [^ ]+)/);
        }
}

muzx

哇！好酷噢！
看来Perl值得一学！

valentine

本来是不爱做这种作业的，但有热心的朋友用perl做了，便改了一下，算是用shell实现的(use sed)：

#!/bin/ksh

for a in "Duration" "RA Inbound Rate" "Outbound Rate" "Inbound Modulation" "Outb
ound Modulation" "Transmitter Model" "Maximum Retry Count" "Buffers Alarm Thresh
old" "Voice Feature" "Longitude" "Latitude" "hone"
do
   sed -n "/$a/s/.*$a \([^ ]*\).*/$a:\1/p" filename
done

valentine

下面的是用awk实现：

awk 'BEGIN{split("Duration,RA Inbound Rate,Outbound Rate,Inbound Modulation,Out
bound Modulation,Transmitter Model,Maximum Retry Count,Buffers Alarm Threshold,V
oice Feature,Longitude,Latitude,Phone",keywords,","}
{
   for(w in keywords){
    if(index($0,keywords[w])){match($0,keywords[w]" [^ ]*";print substr($0,RSTA
RT,RLENGTH)}
   }
}'  filename

这样使用awk只顺序的处理文件一遍，效率高些。
由于awk中gsub的功能欠缺，只能这样实现了。使用gawk的朋友可以用gensub函数方便些。

muzx

看来还得先老老实实跟着你学shell！

valentine

if you have time, if you are interested in，if you are smart ,if you are diligent....
最好是awk，perl，Tcl ...一网打尽，呵呵。