executing rsh command in perl script

executing rsh command in perl script

I want to rsh to a machine and execute some commands in a perl scriprt,
here is the code:
#!/usr/bin/perl
$command="cd /remote/XXX; mkdir aa";
$result=system("rsh machine $command");
The directory aa was not created. Can someone help me have a look? Thanks!