Lines Matching refs:prog
25 my $prog = 'comm';
76 {ERR => "$prog: missing operand after 'a'\n"
77 . "Try '$prog --help' for more information.\n"}],
81 {ERR => "$prog: missing operand\n"
82 . "Try '$prog --help' for more information.\n"}],
86 {ERR => "$prog: extra operand 'no-such'\n"
87 . "Try '$prog --help' for more information.\n"}],
92 {ERR => "$prog: file 2 is not in sorted order\n"
93 . "$prog: input is not in sorted order\n"}],
98 {ERR => "$prog: file 2 is not in sorted order\n"}],
107 {ERR => "$prog: file 1 is not in sorted order\n".
108 "$prog: file 2 is not in sorted order\n"
109 . "$prog: input is not in sorted order\n"}],
114 {ERR => "$prog: file 1 is not in sorted order\n".
115 "$prog: file 2 is not in sorted order\n"
116 . "$prog: input is not in sorted order\n"}],
121 {ERR => "$prog: file 1 is not in sorted order\n"
122 . "$prog: input is not in sorted order\n"}],
127 {ERR => "$prog: file 2 is not in sorted order\n"
128 . "$prog: input is not in sorted order\n"}],
138 {ERR => "$prog: file 1 is not in sorted order\n"}],
145 {ERR => "$prog: file 1 is not in sorted order\n"}],
166 {EXIT=>1}, {ERR => "$prog: multiple output delimiters specified\n"}],
185 my $fail = run_tests ($program_name, $prog, \@Tests, $save_temps, $verbose);