sotering af en txt fil
Jeg har en liste som jeg gerne ville have skåret lidt til. Så nu ville jeg gerne høre om dette var muligt at gøre i Perl.listen er som følgende:
----------------------------
10.140.1.xxx (10.140.1.xxx)
----------------------------
*
Information
Error: 235 - System not found, or NetBIOS ports may be firewalled.
Scan not performed.
----------------------------
NOR01xxxxx (10.140.1.xxx)
----------------------------
* WINDOWS NT4 ENTERPRISE SP6A
Note MS02-008 318202
Note MS02-008 318203
Note MS02-008 317244
Note MS02-053 324096
Note MS02-065 329414
Note MS03-008 814078
Patch NOT Found MS03-011 816093
----------------------------
10.140.1.xxx (10.140.1.xxx)
----------------------------
*
Information
Error: 235 - System not found, or NetBIOS ports may be firewalled.
Scan not performed.
----------------------------
10.140.1.xxx (10.140.1.xxx)
----------------------------
*
Information
Error: 235 - System not found, or NetBIOS ports may be firewalled.
Scan not performed.
----------------------------
NORDxxxx (10.140.1.xxx)
----------------------------
* WINDOWS 2000 SERVER SP4
Information
All necessary hotfixes have been applied.
* INTERNET INFORMATION SERVICES 5.0 SP4
Information
All baseline security hotfixes have been applied.
----------------------------
10.140.1.xxx (10.140.1.xxx)
----------------------------
*
Information
Error: 235 - System not found, or NetBIOS ports may be firewalled.
Scan not performed.
Hvor jeg så gerne ville have alle scanninger der siger:
----------------------------
10.140.1.xxx (10.140.1.xxx)
----------------------------
*
Information
Error: 235 - System not found, or NetBIOS ports may be firewalled.
Scan not performed.
frasoteret. resultatet ville jeg gerne have skrevet over i en ny fil.
mvh
JSG
