my $rcp_command = "rcp $file $username@$hostname:$destfile";
  #  perl will be interpreting this     ^
  system( $rcp_command );