#!/usr/cs/bin/perl

# See http://home.netscape.com/newsref/std/x-remote.html

for ($j=1;$j<=16;$j++) {
  $url = "http://www.cs.umass.edu/~weems/CmpSci635/635lecture$j.html";
  system("netscape -remote 'openURL($url)'");
  print "Loading $url...\n  Press enter to save.\n";
  <STDIN>;
  system("netscape -remote 'saveAs(/users/dwc3q/temp/635lecture$j.ps,PostScript)'");
}