5.97|1|Paper #478
1,7

##</code><code>##

/^(\d+\.\d+)\|.*/;
$gref = $1;


         /^(\d)$/;
$type = $1;