Select Code to Download

#!/usr/bin/perl

use strict;
...

@ARGV==1 or die "Usage: $0 file-to-edit\n";
exec_editor($ARGV[0]);