ViewVC Help

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

root/Development/ray/src/util/genklemsamp.pl

Comparing ray/src/util/genklemsamp.pl (file contents):
Revision 2.9 by greg, Mon Apr 11 03:47:46 2011 UTC vs.
Revision 2.10 by greg, Sat Apr 16 00:39:07 2011 UTC

#	Line 6 | Line 6
6		#       G. Ward
7		#
8		use strict;
9	+	use File::Temp qw/ :mktemp  /;
10		if ($#ARGV < 0) {
11		print STDERR "Usage: genklemsamp [-c N ][-f{a|f|d}] [view opts] [geom.rad ..]\n";
12		exit 1;
13		}
14	<	my $td = `mktemp -d /tmp/genklemsamp.XXXXXX`;
14	>	my $td = mkdtemp("/tmp/genklemsamp.XXXXXX");
15		chomp $td;
16		my $nsamp = 1000;
17		my $fmt = "a";

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines (old)
>	Changed lines (new)