Changeset 27479

Show
Ignore:
Timestamp:
27.05.2013 12:14:51 (6 years ago)
Author:
jmt12
Message:

Remove time parsing as DateTime? is a fricking nightmare to install without the CPAN module manager

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • gs2-extensions/parallel-building/trunk/src/perllib/FileUtils/HDFSShell.pm

    r27423 r27479  
    2929# Pragma 
    3030use strict; 
    31  
    32 # Modules 
    33 use DateTime; 
    3431 
    3532# Configuration 
     
    262259{ 
    263260  my ($path) = @_; 
     261  &FileUtils::printWarning("modificationTime() not supported"); 
    264262  my $file_stats = &fileStats($path); 
    265263  my $mod_date = $file_stats->{'modification_date'}; 
     
    272270  my $mod_hour = $1; 
    273271  my $mod_minute = $2; 
    274   my $mod_datetime = DateTime->new(year      => $mod_year, 
    275                                    month     => $mod_month, 
    276                                    day       => $mod_day, 
    277                                    hour      => $mod_hour, 
    278                                    minute    => $mod_minute, 
    279                                    time_zone => 'local'); 
    280   return $mod_datetime->epoch(); 
     272  return 0; 
    281273} 
    282274## modificationTime()