Select Code to Download

\r  133/8021

use Data::Dumper;
use IO::Handle
...
    }   
    close MSA;
}

$VAR1 = "...\r  171 / 8232\r  181 / 8232\r  191 / 8232\r  201 / 8232\r
+  211 / 8232\r  221 / 8232\r  231 / 8232\r  241 / 8232\r  251 / 8232\
+r  261 / 8232\r  271 / 8232\r  281 / 8232\r  291 / 8232\r  301 / 8232
+\r  311 / 8232\r  321 / 8232...";