Time::SoFar(3) User Contributed Perl Documentation Time::SoFar(3)


NNNNAAAAMMMMEEEE
      Time::SoFar - Perl module to calculate run time

SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
          use Time::SoFar qw( runtime runinterval figuretimes );

          # [...] denotes optional arguments
          $times = runtime( [$no_optimize] );
          @times = runtime( [$no_optimize] );

          $times = runinterval( [$no_optimize] );
          @times = runinterval( [$no_optimize] );

          $times = figuretimes( $seconds [, $no_optimize] );
          @times = figuretimes( $seconds [, $no_optimize] );


SSSSAAAAMMMMPPPPLLLLEEEESSSS
          my $elasped = runtime();
          print "Elapsed time $elapsed\n";
          # prints, eg, "Elapsed time 17:34\n"

          my $sincethen = runinterval(1);
          print "Time since then $sincethen\n";
          # prints, eg, "Time since then 0:00:00:51\n"

          ($day, $hour, $min, $sec) = figuretimes(86400 + 2*3600 + 3*60 + 4, 1);
          # $day = 1; $hour = 2; $min = 3; $sec = 4;

          @times = figuretimes(2*3600 + 3*60 + 4);
          # @times = (2, 3, 4)

          @times = figuretimes(17,1);
          # @times = (0, 0, 0, 17)

          $times = figuretimes(2*3600 + 3*60 + 4, 1);
          # $times = '0:02:03:04';


DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
      TTTTiiiimmmmeeee::::::::SSSSooooFFFFaaaarrrr has two functions for calculating how long a
      script has been running. `runtime()' always works from the
      time the script was started (using _$_^_T). `runinterval()'
      works from the last time `runtime()' or `runinterval()'
      was called (or since the start of the script).

      Both `runtime()' and `runinterval()' use `figuretimes()'
      to render a raw number of seconds into component time
      units. Both take an optional boolean argument that gets
      passed to `figuretimes()' to influence its output.

      In an array context `figuretimes()' returns the
      timecomponents as an array, in a scalar context it returns
      those components as a :::: delimited string. The default



2000-12-13                 perl v5.6.0                          1





Time::SoFar(3) User Contributed Perl Documentation Time::SoFar(3)


      behaviour is to optimize away 0 output from the longer
      period end of the output, leaving a minimum of
      minutes:seconds. This is good for arrays that will be
      passed to `join()', but not so good for a list of
      variables, so this behaviour can be disabled by using a
      true value for _$_n_o___o_p_t_i_m_i_z_e.

IIIINNNNHHHHEEEERRRRIIIITTTTAAAANNNNCCCCEEEE
      Time::SoFar inherits only from Exporter.

CCCCAAAAVVVVEEEEAAAATTTTSSSS
      Time::SoFar has a granularity of seconds, and is therefore
      not so useful for small elapsed times.

PPPPRRRREEEERRRREEEEQQQQUUUUIIIISSSSIIIITTTTEEEESSSS
      Only stock perl modules are used.

OOOOSSSSNNNNAAAAMMMMEEEESSSS
      So long as _$_^_T and `time()' are calculated using the same
      epoch there should be no operating system dependence.

SSSSEEEEEEEE AAAALLLLSSSSOOOO
      _$_^_T in the perlvar manpage.

CCCCOOOOPPPPYYYYRRRRIIIIGGGGHHHHTTTT
      Copyright 2000 by Eli the Bearded / Benjamin Elijah
      Griffin.  Released under the same _l_i_c_e_n_s_e(s) as Perl.

AAAAUUUUTTTTHHHHOOOORRRR
      Eli the Bearded wrote this to do away with all the _$_^_T one
      liners at the end of his batch processing scripts.


























2000-12-13                 perl v5.6.0                          2

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.