...
 my @command = ('vi', $test);
 system(@command) == 0
  or die "could not '@command': $?";