#!/bin/sh

/usr/bin/perl -pi -e 's/[]+//g' $1
/usr/bin/perl -pi -e 's/[\ \:\;\,\/]+<\/subfield>/<\/subfield>/g' $1

exit