Perl

Get Current Date/Time as Timestamp (YYYY-MM-DDThh:mm:ssTZD)

Demonstrates how to get the current system date/time in YYYY-MM-DDThh:mm:ssTZD format. Perl

use chilkat();

$success = 0;

$dt = chilkat::CkDateTime->new();

$success = $dt->SetFromCurrentSystemTime();

# Get a UTC time.
$bLocal = 0;
$timestamp = $dt->getAsTimestamp($bLocal);
print "Current UTC Time: " . $timestamp . "\r\n";

# Get a local time.
$bLocal = 1;
$timestamp = $dt->getAsTimestamp($bLocal);
print "Current Local Time: " . $timestamp . "\r\n";

# Sample output:
# 
# Current UTC Time: 2022-03-01T00:48:58Z
# Current Local Time: 2022-02-28T18:48:58-06:00