Colorear ls en AIX con AWK

[Kuk]

#!/bin/bash
 
ls -l "$@" | awk 'BEGIN {ORS="\n";FS=" "} 
 
{
if ($0 ~ /^d/) print "\033[1;34m" $0 "\033[0m";
else
if ($0 ~ /^l/) print "\033[1;31m" $0 "\033[0m";
else
if ($0 ~ /^c/ || $0 ~ /^b/) print "\033[44;37m" $0 "\033[0m";
else
if ($0 ~ /^s/) print "\033[0;31m" $0 "\033[0m";
else
if (substr($0,4,1) == "x" || substr($0,7,1) == "x" || substr($0,10,1) == "x") 
{print substr($0,1,58) "\033[1;32m"  $9 "\033[0m";}
else
print "\033[0m" $0 ;
}'