Changeset 9c72c3b
- Timestamp:
- Jul 21, 2010, 11:00:44 PM (14 years ago)
- Branches:
- web
- Parents:
- f6f3e91
- git-author:
- Jessica B. Hamrick <jhamrick@…> (07/21/10 23:00:44)
- git-committer:
- Jessica B. Hamrick <jhamrick@…> (07/21/10 23:00:44)
- Location:
- web
- Files:
-
- 4 added
- 1 moved
Legend:
- Unmodified
- Added
- Removed
-
web/www/cgi-bin/gutenbach-web.pl
r30beeab r9c72c3b 1 #!/bin/perl 2 1 3 use Net::CUPS; 2 4 use Net::CUPS::Destination; … … 8 10 9 11 my $cups = Net::CUPS->new(); 10 11 my $printer = $cups->getDestination(" buildsmp3");12 $cups->setServer("lbsg.mit.edu"); 13 my $printer = $cups->getDestination("pikamp3"); 12 14 #print header(); 13 15 print start_html(); … … 17 19 my $attr; 18 20 print <<EOF; 19 <TABLE SUMMARY="Job List" >21 <TABLE SUMMARY="Job List" cellpadding="5px"> 20 22 <THEAD> 21 23 <TR><TH> USER</TH><TH>TITLE</TH><TH>ARTIST</TH><TH>ALBUM</TH></TR>
Note: See TracChangeset
for help on using the changeset viewer.