Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
while ( <BW> ) {
                  print;
}

Select or download this

#!/usr/bin/perl

...
while ( <BW> ) {
     print; 
}