source: branches/stable/HELP_SOURCE/arb_xslt.sh

#!/bin/bash

xslt() {
    set -x
    xsltproc "$@"
}

format_error_messages() {
    perl -pne 's/^([a-z]+)\s+error:\s+file\s+([^\s]+)\s+line\s+([0-9]+)\s+/\2:\3: Error: [\1] /'
}
        
( xslt "$@" ) 2> >( format_error_messages >&2 )
exit ${PIPESTATUS[0]}