On windows, you can use the /t switch with Date or Time command to display 
the date without prompting
Date /T  will not prompt you for the new date. I modified your code below.
I am assuming you are trying to get the system date from windows:

use strict;
use warnings;
my $result = `date /t`;
print "Result is $result\n";

Alternatively you can use
my $result=(localtime);
print "My local time is $result\n";


Tony B. Okusanya
"Live Life By Design And Not From Crisis to Crisis"



"raj esh" <[EMAIL PROTECTED]> 
Sent by: [EMAIL PROTECTED]
06/13/2007 09:37 AM

To
activeperl@listserv.ActiveState.com
cc

Subject
Windows-Command line Arguments






Dear Guru's,
 
Here is my sample script...which i am running on windows.
 
use strict;
use warnings;
 
my $result = system ( "date");
 
Now Date command returns me one more command prompt on which i have to 
enter current date(means need to enter another command) how do i enter one 
more command.
 
Please help me gurus. 
 
Is their any module which can help me ?? 
 
I have checked perldoc -q system, perldoc -q command. These are little 
confusing . I will surely recheck these if the answer lies with in these.
 
Correct me if i am not clear on mentioned my problem.
 
Thanks,
Raj.
 Luggage? GPS? Comic books? 
Check out fitting gifts for grads at Yahoo! Search.
_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

------------------------------------------------------------------------------
Electronic Privacy Notice. This e-mail, and any attachments, contains 
information that is, or may be, covered by electronic communications privacy 
laws, and is also confidential and proprietary in nature. If you are not the 
intended recipient, please be advised that you are legally prohibited from 
retaining, using, copying, distributing, or otherwise disclosing this 
information in any manner. Instead, please reply to the sender that you have 
received this communication in error, and then immediately delete it. Thank you 
in advance for your cooperation.
==============================================================================
_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to