पर्ल में विभिन्न समय क्षेत्र में भविष्य के कार्य को कैसे निर्धारित करें? - पर्ल, डेटाटाइम, टाइमज़ोन, लोकलटाइम

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

उदाहरण:

perl script.pl -action reboot LAHost.com 2014/012/12 15:00:00 "America/Los_Angeles"

इस स्क्रिप्ट को लॉस एंजिल्स में स्थानीय समयानुसार दोपहर 3 बजे LAHost.com कंप्यूटर पर रिबूट शेड्यूल किया जाना चाहिए।

किसी ने मुझे dateTime या किसी अन्य अंतर्निहित कार्यों का उपयोग करके पर्ल में ऐसा करने का एक तरीका खोजने में मदद कर सकता है?

मैं प्रोग्रामिंग में नया हूं और वर्तमान में पर्ल सीख रहा हूं। तो कृपया मेरी अज्ञानता का बहाना करो।

उत्तर:

आपका प्रश्न प्रतीत होता है

मैं एक निर्दिष्ट समय क्षेत्र में स्थानीय समय के लिए दिनांक और समय कैसे परिवर्तित करूं?

use DateTime::Format::Strptime qw( );

my $date = "2014/012/12";
my $time = "15:00:00";
my $tz   = "America/Los_Angeles";

my $format = DateTime::Format::Strptime->new(
pattern   => "%Y/%m/%d %H:%M:%S",
time_zone => $tz,
on_error  => "croak",
);

my $dt = $format->parse_datetime("$date $time");
$dt->set_time_zone("local");

print $format->format_datetime($dt), "n";

my $timeZone="Europe/London";
my $dateTime = DateTime->new(year => $year, month => $month,
day => $day, hour => $hour, minute => $minute,
second => $second, time_zone => $timeZone);