Select Code to Download

#!/usr/bin/perl -w
use strict;
...
        printf "%8d: 1/%s\n", $r, $f;
    }
}

       0: 1/2
       1: 1/3
...
      52: 1/521
     261: 1/523
     240: 1/17*31