- or download this
[reports]
...
logfilepath1 = f:\logfiles\zwire\zwire7\split-0\ex*.log
logfilepassword =
servername = zwire7
- or download this
[header]
item =
item2 =
item3 =
- or download this
[server1]
logfilepath1 = F:\Logfiles\ZWire\Zwire4\split-0\ex*.log
...
logfilepassword =
logfileusername =
id = a104136320003954
- or download this
while (<IN>) {
if (/\[server(\d)\]/) {
...
}
print OUT @output;
- or download this
undef $/;
$file = <IN>; # to slurp whole file at once
$file =~ s/ # some complex regex //m;