my $editor = $ENV{EDITOR} || '/usr/bin/vi';

system($editor, shift);