for my $quote (q{}, q{"}) {
  $cmd = "ls -l ${quote}simple.pl${quote}";
  warn $cmd;
  system $cmd;