#!usr/bin/perl -w
use strict;

my $cmd = "cd /cat/bat";

my $rc = system($cmd);
print "rc = $rc\n";

#PRINTS:
#The system cannot find the path specified.
#rc = 256

$cmd = 'cd C:\temp';
$rc = system($cmd);
print "rc = $rc\n";

#PRINTS:
#rc = 0