Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
find if the date is the today date, in Perl
Both server are in cluster, in a virtual environment. I have done this till now, and it seems to work: #!/usr/bin/perl use strict; use warnings; use Net::SFTP::Foreign; open FIL, '<monitorFile'; my $line = <FIL>; close FIL; my $host = 'host1'; my $password = 'password'; my $user = 'root'; my... -
find if the date is the today date, in Perl
Thank you very much!! that was great! Can you please help me in another step? I want to add this: If the date is the TODAY day, copy this file into another server. Thank you very very much!!! -
find if the date is the today date, in Perl
i have written only the part that is related to the format of my date. sorry, but i am new to perl. #!/usr/bin/perl use strict; use warnings; my ( $sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst ) = localtime(time()- 24*60*60 ); $year += 1900; $mon += 1; if( $mon < 9 ){ $mon = "0"... -
find if the date is the today date, in Perl
Hi all, i am new to perl. i have a text file that contains the date in only one row. I want to check if the date inside this file is the today date or not. The file contains the date in this form: file_save = 20120628150005 the first 8 numbers( 20120628 ) indicates the date, the other... -
AWK output format
Hi all, i have written this script: Code: awk -F';' ' BEGIN { printf "\n" printf "\n" printf "\n" printf "----------------------------------------------\n" print " For test " printf "----------------------------------------------\n" test_200 = 0 test_300 = 0 test_500 = 0...
