my $res = texec (10, "/usr/bin/ls", "-al", "/");
if (ref ($res->[0])) {
    print "Error while executing: $res->[1]\nCommand output:\n";
    print Dumper ($res->[0]), "\n";
} else {
    print "Command output:\n";
    print Dumper ($res), "\n";
}