Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: Parse and Summarise Big Brother logs

by chanio (Priest)
on Apr 17, 2006 at 21:49 UTC ( #543932=note: print w/replies, xml ) Need Help??


in reply to Parse and Summarise Big Brother logs

Nice!

...
chomp(my $today = `date +%Y-%m-%d`);
...
You could...
my (@date)=((localtime())[5,4,3]); $date[0]+=1900; $date[1]++; my ($today)=sprintf("%4i-%02i-%02i",@date);
THX!

Replies are listed 'Best First'.
Re^2: Parse and Summarise Big Brother logs
by CharlesClarkson (Curate) on Jun 18, 2006 at 05:18 UTC

    How about strftime()?

    use POSIX 'strftime'; print strftime '%Y-%m-%d', localtime();
    HTH,
    Charles

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://543932]
help
Chatterbox?
[shmem]: Re^5: Understanding endianness of a number - nice! "zigamorph" will be the host name of the VM I'll set up to debug Microfocus COBOL/perl stuff :-D
[prospect]: Hi, to avoid cluthering the Seekers of Perl Wisdom page. I wanted to print out the values on a new line each. So I though I put a . "\n" behind "print foreach func()" but something interesting happens and it I just get "5" as output :p
[prospect]: print foreach func(). "\n"; sub func { return ( 1, 2, 3, 4, 5 ); }
[prospect]: if I remove the ".\n" I get "12345" as output

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (10)
As of 2017-07-24 10:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I came, I saw, I ...
























    Results (350 votes). Check out past polls.