user-tools/fixRFC822filemtime

   1 #!/bin/bash
   2
   3 true <<EOF
   4 =pod
   5
   6 =head1 NAME
   7
   8 fixRFC822filemtime - Set a file's last modification time, which contains an email message in RFC-822 format, to the email's Date
   9
  10 =cut
  11
  12 EOF
  13
  14
  15 set -u
  16 set -e
  17
  18 for file in "$@"
  19 do
  20         if [ -f "$file" ]
  21         then
  22                 if [ "${file:0:1}" != / ]
  23                 then
  24                         file=./$file
  25                 fi
  26
  27                 date=`egrep -im1 ^Date: "$file" | cut -f2- -d: | sed -e 's/\r//'`
  28
  29                 if [ -n "$date" ]
  30                 then
  31                         tstamp=`date +%s -d "$date"`
  32
  33                         if [ -n "$tstamp" ]
  34                         then
  35                                 touch -t `date +%Y%m%d%H%M.%S -d "@$tstamp"` "$file"
  36                         fi
  37                 fi
  38         fi
  39 done