Would be a couple of hours work for anyone using a scripting language like Perl / TCL etc.