ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/repos/FreeBSDAdmin/HostUpdate/HostUpdate.pl

Comparing HostUpdate/hostupdate.pl (file contents):
Revision 5 by Douglas Thrift, 2003-11-05T20:55:52-08:00 vs.
Revision 16 by Douglas Thrift, 2003-11-09T17:13:41-08:00

#	Line 1 | Line 1
1	<	#!D:/Perl/bin/perl.exe
1	>	#!/usr/bin/perl
2		#
3		# Host Update
4		#
#	Line 15 | Line 15 | my ($sysname, $nodename, $release, $vers
15
16		$agent->agent("Host Update/1.0 ($sysname $release $machine) ");
17
18	<	my $response = $agent->post("http://douglaspc/cgi-bin/hostupdate.exe",
18	>	my $response = $agent->post("http://douglasthrift.net/topsecret/hostupdate.cgi",
19		[host => $nodename]);
20		my $content = $response->content;
21
22	<	print "$content
23	<	";
22	>	print "$content";

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines