Skip to content
Snippets Groups Projects
Commit 8a1556b4 authored by anonymous's avatar anonymous
Browse files

fix anonymizeLog

parent 8ead004c
Branches
Tags
No related merge requests found
...@@ -61,10 +61,8 @@ while (my $Line = <STDIN>) { ...@@ -61,10 +61,8 @@ while (my $Line = <STDIN>) {
chomp $Line; chomp $Line;
# Erschöpftende Suche mit s/Pattern/Replacement/g; zuerst wird Slave, Master und Data-Server ersetzt anschließend, alle IP adressen mit ersetzt. # Erschöpftende Suche mit s/Pattern/Replacement/g; zuerst wird Slave, Master und Data-Server ersetzt anschließend, alle IP adressen mit ersetzt.
$Line =~ s/IP-Adresse-SlaveServer/SlaveServer/g; $Line =~ s/(\d{1,3})\.(\d{1,3})\.\d{1,3}\.\d{1,3}/$1.$2.0.0/g;
$Line =~ s/IP-Adresse-MasterServer/MasterServer/g;
$Line =~ s/IP-Adresse-PSQL_Sever/DataServer/g;
$Line =~ s/\.\d{1,3}\.\d{1,3}\.\d{1,3}/.X.X.X/g;
print $LOG "$Line\n"; print $LOG "$Line\n";
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment