or download this
#!/usr/bin/perl
use strict;
...
<DXCC:3>291<COUNTRY:13>United States<GRIDSQUARE:6>DM44ik<LAT:11>N034 2
+5.359<LON:11>W111 19.869
<MY_GRIDSQUARE:6>DM09ei<OPERATOR:4>K5XI<MY_RIG:11>Elecraft K3<COMMENT:
+6>UT WSH<EMAIL:17>kent@premier1.net
<EOR>