Help for this page

Select Code to Download


  1. or download this
    if( $vmServerIP =~ m/^(\d\d?\d?)\.(\d\d?\d?)\.(\d\d?\d?)\.(\d\d?\d?)/ 
    +){
        if($1 <= 255 && $2 <= 255 && $3 <= 255 && $4 <= 255){
          open (my $oldhfile, ,'<', $hfilepath) or die "Could not open $hf
    +ilepath for reading.";
          my @hfile = <$oldhfile>;
    
  2. or download this
          foreach $hfileline (@hfile) {
               next unless $hfileline =~/^\s*\s+$hNames/;
               $hfileline = "$vmServerIP       $hNames\n";            
          }