Skip to content

Instantly share code, notes, and snippets.

@quyenlv
quyenlv / aix-ls
Last active March 7, 2019 19:51 — forked from earonesty/aix-ls
ls --color support for systems that don't have it, like AIX, and when you don't want to install gnu
#!/usr/bin/perl
use strict;
use Getopt::Long qw(:config pass_through no_ignore_case bundling);
my $do_color;
GetOptions("colors"=>\$do_color);
my @buf;