पर्ल में डेटटाइम ऑब्जेक्ट में स्ट्रिंग को कैसे पार्स करें?

Question

मुझे DateTime पर्ल मॉड्यूल के बारे में पता है, और DateTime::Format:: मॉड्यूल के कई प्रकार विशिष्ट दिनांक/समय प्रारूपों को पार्स करने के लिए जानते हैं। हालांकि दिनांक/समय तारों के कुछ उदाहरण दिए गए हैं, मैं कैसे पता लगा सकता हूं (कोडिंग/डिज़ाइन समय पर, रनटाइम पर नहीं) किस विशिष्ट मॉड्यूल का उपयोग करना चाहिए?

उदाहरण के लिए, मैं की तरह तार पार्स करने के लिए करना चाहते हैं: October 28, 2011 9:00 PM PDT

जहां मैं इस देखो और पाते हैं जो सबसे उपयुक्त मॉड्यूल होगा सकता है वहाँ एक सूची सबसे आम दिनांक/समय प्रारूपों के कहीं है?

मुझे कुछ मॉड्यूल के बारे में भी पता है जो रनटाइम पर प्रत्येक दिए गए स्ट्रिंग के प्रारूप को "अनुमान लगाने" का प्रयास करते हैं और उनका सर्वश्रेष्ठ प्रदर्शन करते हैं। लेकिन, संवेदनशील अनुप्रयोगों के लिए, मैं किसी अनुप्रयोग को डिज़ाइन करते समय पहले प्रारूप (यथासंभव सख्ती से) निर्धारित करना चाहता हूं, और उसके बाद एक मॉड्यूल का उपयोग करें जो मुझे चेतावनी देगा यदि कोई स्ट्रिंग निर्दिष्ट प्रारूप से मेल नहीं खाती है।

मुझे इसके बारे में कैसे जाना चाहिए?

Answer 1

DateTime::Format::Strptime दिनांक/समय तार लेता है और उन्हें दिनांक समय वस्तुओं में पार्स करता है।

#!/usr/bin/perl 

use strict; 
use warnings; 

use DateTime::Format::Strptime; 

my $parser = DateTime::Format::Strptime->new(
    pattern => '%B %d, %Y %I:%M %p %Z', 
    on_error => 'croak', 
); 

my $dt = $parser->parse_datetime('October 28, 2011 9:00 PM PDT'); 

print "$dt\n"; 

पैटर्न में उपयोग किए गए वर्ण अनुक्रम POSIX मानक हैं। विवरण के लिए 'आदमी strftime' देखें।

Answer 2

Date::Parse मॉड्यूल पर देखें, यानी str2time() फ़ंक्शन। इसका उपयोग आमतौर पर प्रयुक्त प्रारूपों में से अधिकांश के लिए है।

उदाहरण:

use Date::Parse; 
use DateTime; 

my $str = "Tue, 20 Sep 2011 08:51:08 -0500"; 
my $epoch = str2time($str); 
my $datetime = DateTime->from_epoch(epoch => $epoch); 

Answer 3

मैं Time::Piece का उपयोग केवल इसलिए करता हूं क्योंकि यह संस्करण 5.10 के बाद मानक पर्ल मॉड्यूल सेट का हिस्सा है।

आप parse date strings पर इसकी क्षमता को हरा नहीं सकते हैं।

my $time = Time::Piece->strptime(
     "October 28, 2011 9:00 PM PDT", 
     "%B %d, %Y %r %Z"); 

Answer 4

आप देख रहे हैं आम तारीख के लिए/समय प्रारूपों DateTime::Locale

use DateTime::Locale 
my $locale = DateTime::Locale->load('DE_de'); 

The following methods return strings appropriate for the DateTime->format_cldr() method:

$locale->date_format_full() 
$locale->date_format_long() 
$locale->date_format_medium() 
$locale->date_format_short() 
$locale->date_format_default() 
$locale->time_format_full() 
$locale->time_format_long() 
$locale->time_format_medium() 
$locale->time_format_short() 
$locale->time_format_default() 
$locale->datetime_format_full() 
$locale->datetime_format_long() 
$locale->datetime_format_medium() 
$locale->datetime_format_short() 
$locale->datetime_format_default() 

पर एक नजर है आप DateTime::Format::CLDR मॉड्यूल

use DateTime::Format::CLDR; 
# 1. Basic example 
my $cldr = DateTime::Format::CLDR->new(
    pattern  => 'dd.MM.yyyy HH:mm:ss', 
    locale  => 'de_DE', 
    time_zone => 'Europe/Berlin', 
); 
my $dt = $cldr->parse_datetime('26.06.2013 11:05:28');