Help for this page

Select Code to Download


  1. or download this
    open IN, '<:encoding(UTF-8)', "WE_EX.txt"
open OUT, '>:encoding(UTF-8)', "WE_EX.out"
  2. or download this
    while (<IN>) {
  3. or download this
    use strict;
use warnings;
...

close $IN;
close $OUT;