Index: trunk/ippScripts/scripts/tdl_generate.pl
===================================================================
--- trunk/ippScripts/scripts/tdl_generate.pl	(revision 21202)
+++ trunk/ippScripts/scripts/tdl_generate.pl	(revision 27718)
@@ -13,6 +13,7 @@
 use Sys::Hostname;
 my $host = hostname();
+my $date = `date`;
 #print "\n\n";
-#print "Starting script $0 on $host\n\n";
+#print "Starting script $0 on $host at $date\n\n";
 
 use vars qw( $VERSION );
@@ -58,5 +59,5 @@
 # resolve any path:// or file:// in outroot
 $outroot = $ipprc->file_resolve($outroot);
-    
+
 # Look for programs we need
 my $missing_tools;