#!perl -p
s;.{13};;;y;2-4;397