sub mysystem { 
  my ($cmd, $args) = @_;
  my $finalcmd = 'c:/cygwin/bin/'.$cmd.'.exe'.' '.$args;
  # or ... 'c:/cygwin/bin/bash.exe -c "'.$cmd.' '.$args.'"';
  return system($finalcmd);
}
mysystem("ls", "-al data2.txt > abc")==0 or die "system command failed";