/[vz-tools]/trunk/vz-clone.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/vz-clone.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 32 by dpavlin, Thu Oct 11 19:28:27 2007 UTC revision 33 by dpavlin, Tue Oct 16 09:35:59 2007 UTC
# Line 172  my $note = "# modified by $0\n"; Line 172  my $note = "# modified by $0\n";
172  sub fix_ip {  sub fix_ip {
173          my $ip = shift;          my $ip = shift;
174          $ip =~ s/['"]//g;          $ip =~ s/['"]//g;
175          $ip =~ s/^\d+\./10./;  #       $ip =~ s/^\d+\./10./;
176            $ip =~ s/^\d+\.\d+\./192.168./;
177          warn "$CVEID new IP number: $ip\n";          warn "$CVEID new IP number: $ip\n";
178          return $note . qq{IP_ADDRESS="$ip"};          return $note . qq{IP_ADDRESS="$ip"};
179  }  }

Legend:
Removed from v.32  
changed lines
  Added in v.33

  ViewVC Help
Powered by ViewVC 1.1.26