#!/usr/bin/octave -qf
% Copyright 2005 Daniel Cer (daniel.cer@cs.colorado.edu)
%
% This work is licensed under the Creative Commons Attribution-NonCommercial-
% ShareAlike License. To view a copy of this license, visit 
% http://creativecommons.org/licenses/by-nc-sa/2.5/ or send a letter to 
% Creative Commons, 543 Howard Street, 5th Floor, San Francisco, California, 
% 94105, USA.

for file_idx = 1:nargin
  printf("\n%s:\n", argv{file_idx});
  if (fh = fopen(argv{file_idx})) == -1, 
     fprintf(stderr, "Can't open \"%s\"\n", argv{file_idx});
     exit(-1);
  endif
  line = fgetl(fh); while !feof(fh), disp(line); line = fgetl(fh); end
  fclose(fh);
endfor