Select Code to Download

#!/usr/bin/perl -w
use strict;
...
    my $ret = Win32::GUI->MessageBox("ROW: $row COL: $col (CELLDATA: $
+celldata)");
    return 1;
}