01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
% cd ~/Mail
% mv tmp 2007tmp
% mkdir tmp
% perl -i.20080104 -pe 's/Mail\/tmp\//Mail\/2007tmp\//' NMZ.{r,field.uri}
% perl -ne 'print pack("N", $i);$i+=length;' NMZ.field.uri > NMZ.field.uri.i