The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/bin/sh

cd `dirname $0`
rm *.mo
for PO in *.po; do
    MO=$(echo $PO | sed 's/po$/mo/')
    msgfmt -o $MO $PO
    if [ "$PO" = "basic.po" ]; then
        msgfmt -f -o fuzz.mo $PO
    fi
done