fork download
copy 
  1. set Lets {\x33..[^8]+.(.)(.)[3-8]+(..)[^4]+([^5]+).+(.)\x4e(.)[^\x37]+(..).(\064)}
  2.  
  3. set go "0123456789876543210123456789N3422W83599876543210"
  4.  
  5. regexp $Lets $go geocaching C F A E G B H D
  6.  
  7. puts "N 34 $A.$B$C$D  W 083 [incr E]$F.$G$H"
Success #stdin #stdout 0.01s 5704KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
N 34 21.394  W 083 58.976
https://ideone.com/zihOAl
language:
TCL (tcl 8.6)
created:
6 days ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!