Changeset 1307
- Timestamp:
- 2000-07-26T10:24:12+12:00 (24 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/cgi-bin/webpage_mkcol.pl
r1305 r1307 43 43 my %args = (); 44 44 45 open (FILE, '>d:\gsdl\logout.txt') || die;46 47 45 foreach $p ($cgi->param()) 48 46 { 49 47 $args{$p} = $cgi->param($p); 50 51 print FILE "webpage_mkcol.pl - $p -> $args{$p}\n"; 52 } 53 54 close FILE; 48 } 49 55 50 return \%args; 56 51 }
Note:
See TracChangeset
for help on using the changeset viewer.