#!/bin/sh

/usr/bin/getfacl ${1:+"$@"} \
|/usr/bin/perl -pe 's/\\([0-7]{3})/chr(oct($1))/ge'

