home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / games / volume15 / xbomb / part03 / debug_solver < prev    next >
Text File  |  1993-01-27  |  491b  |  25 lines
  1. #!/usr/local/bin/perl
  2.  
  3. #
  4. # debug solver
  5. # just print out the map
  6. #
  7. # %W% (UCLA) %G%
  8. #
  9. # statistics is Copyright (C) 1992 by John Heidemann, Los Angeles, CA.
  10. # All rights reserved.  Permission is granted to freely distribute
  11. # this as long as this copyright message is retained intact.
  12. # Permission to distribute this as part of a commerical product
  13. # requires explicit permission of the author.
  14.  
  15. $| = 1;
  16.  
  17. while (<STDIN>) {
  18.     print STDERR $_;
  19.     if (/^$/) {
  20.         print STDOUT "\n";
  21.     };
  22. };
  23.  
  24. exit 0;
  25.