From Adam Witney:

I downloaded a copy of GACK yesterday (gack3631.pl), but I had to make some
modifications to get it to run on my Mac OSX 10.3.4 machine. Nothing too
major, so I have included a diff below.


--- gack3631.pl 2004-06-12 14:15:09.000000000 +0100
+++ gack3631_aaw.pl     2004-06-11 18:10:23.000000000 +0100
@@ -323,10 +323,10 @@
 $binout = 0;
 $outfilefr->Checkbutton(-text=> "Binary output",
                        -variable=> \$binout,
-                       )->grid(-row=>1,-col=>0,-sticky=>'w');
+                       )->grid(-row=>1,-column=>0,-sticky=>'w');
 
 $outfilefr->Label(-text=> "Binary %EPP Cutoff",
-                 )->grid(-row=>1,-col=>2);
+                 )->grid(-row=>1,-column=>2);
 
 $binoutcut = 50;
 $outfilefr->Scale(-from=>0,
@@ -340,11 +340,11 @@
 $triout = 0;
 $outfilefr->Checkbutton(-text=> "Trinary output",
                        -variable=> \$triout,
-                       )->grid(-row=>2,-col=>0,-sticky=>'w');
+                       )->grid(-row=>2,-column=>0,-sticky=>'w');
 $outfilefr->Label(-text=> "Trinary %EPP Cutoff 1",
-                 )->grid(-row=>2,-col=>2);
+                 )->grid(-row=>2,-column=>2);
 $outfilefr->Label(-text=> "Trinary %EPP Cutoff 2",
-                 )->grid(-row=>3,-col=>2);
+                 )->grid(-row=>3,-column=>2);
 
 $trioutcut1 = 0;
 $trioutcut2 = 100;