Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
    return <STDIN> =~ /y/i ? $choices[0] : $was;
    }
  }

Select or download this

a. this is some whitelist test
b. for IP whitelist testing and your whitelist
...
c. line with no replacement
d. with whitelist and IP whitelist entries and IP whitelist entries ag
+ain.
e. this is another whitelist test