alias ls='/bin/ls --color=never' PS1='$ ' #### if ( wantarray ) { my @a = split "\n", $r; # chomp( @a ); return \@a; } else { return $r; }