#! usr/bin/perl
use POSIX;
use strict;
use warnings;
my $file = $ARGV[0];
open FILE,'<', $file;
while (my $line = <FILE>){print $line;}
my $var = 5;
print $var;
it gave me
Code:
0.355u 1.00s 0:1.01 110.2% 0+0k 0+0io 0pf+0w
on the terminal, after printing the contents of the file that I've given as ARGV[0] . .
And yes, that file does not contain the above line . .
uname -a gives,
Code:
Linux <username> 2.6.18-274.3.1.el5 #1 SMP <date & time> x86_64 GNU/Linux
I am using Redhat 5.0 . .
Also, time sleep 10 gives,
Code:
0.000u 0.000s 0:10.00 0.0% 0+0k 0+0io 0pf+0w
so I guess you're on right track, Corona688
So, What does the rest four fields signify?
Thanks,
-MD
Last edited by Scrutinizer; 10-23-2013 at 04:12 AM..
Reason: code tags instead of quote tags
NetSDS::Util::DateTime(3pm) User Contributed Perl Documentation NetSDS::Util::DateTime(3pm)NAME
NetSDS::Util::DateTime - common date/time processing routines
SYNOPSIS
use NetSDS::Util::DateTime;
print "Current date: " . date_now();
DESCRIPTION
This package provides set of routines for date and time processing.
EXPORTED FUNCTIONS
date_now_array([TIME])
Returns array of date items for given date. If source date is not set current date used.
date_now([TIME])
Return [given] date as string.
2001-12-23 14:39:53
date_now_iso8601([TIME])
Return date as ISO 8601 string.
20011223T14:39:53Z
<http://en.wikipedia.org/wiki/ISO_8601> http://www.w3.org/TR/NOTE-datetime <http://www.w3.org/TR/NOTE-datetime>
date_strip(DATE)
Trim miliseconds from date.
date_date(DATE)
Trim time part from date.
date_time(DATE)
Trim date part from date.
time_from_string($string)
Return parsed date/time structure.
date_from_string($string)
Return date from string representation.
date_inc([INCREMENT, [TIME]])
Return date incremented with given number of seconds.
date_inc_string([INCREMENT, [TIME]])
Return string representation of date incremented with given number of seconds.
EXAMPLES
None yet
BUGS
Unknown yet
SEE ALSO
Date::Parse, Date::Format
TODO
Import stuff from Wono project
AUTHOR
Valentyn Solomko <val@pere.org.ua>
Michael Bochkaryov <misha@rattler.kiev.ua>
perl v5.12.4 2011-08-27 NetSDS::Util::DateTime(3pm)
10-22-2013
