tab/usmarc.flt

   1 #
   2 # Rather dummy input-filter for MARC
   3 #
   4
   5 BEGIN                   { begin record usmarc }
   6 /^.../ / / /../ / /     { begin element $0 }
   7 /\$/ /./ BODY /[$\n]/   { data -element $1 $2; unread 3 }
   8 /\n/                    { end element }