Help for this page
Select Code to Download
Select
or
download this
#!/usr/bin/perl -w while (<DATA>) { ... e-5 e-6 e-8