Select Code to Download

bos-mp96h:~ jvx$ head asgn.txt  
ra_uuid: a37bbde8-36ba-11e8-a697-00e081ea0e98
...
mpg=2 mrule=140 reg=7989 score=10625 rank=0 perc=100 mp_demand=40
mpg=3 mrule=150 reg=7989 score=0 rank=0 perc=100 mp_demand=20
mpg=4 mrule=150 reg=7989 score=10625 rank=0 perc=100 mp_demand=40

#! /usr/bin/perl -w
use strict;
...
close($FH);
close($OUT);

bos-mp96h:~ jvx$ ./partition_file.pl asgn.txt  
Can't use string ("00000140") as a symbol ref while "strict refs" in u
+se at ./partition_file.pl line 26, <$FH> line 6.