在Perl中:

>> time
=> 1335552733

首先，Unix的“epoch”或“zero-time”是1970-01-01 00:00:00Z(意思是1970年1月1日的Zulu或GMT或UTC时区的午夜)。Unix时间戳是指从该时间开始的秒数——不包括闰秒。

在Perl中生成当前时间相当简单:

perl -e 'print time, "\n"'

生成与给定日期/时间值相对应的时间就不那么容易了。逻辑上，使用POSIX中的strptime()函数。然而，Perl POSIX::strptime模块(它与POSIX模块是分开的)具有签名:

($sec, $min, $hour, $mday, $mon, $year, $wday, $yday) = 
                                     POSIX::strptime("string", "Format");

POSIX模块中的mktime函数具有如下签名:

mktime(sec, min, hour, mday, mon, year, wday = 0, yday = 0, isdst = 0)

所以，如果你知道你的数据的格式，你可以写一个变体:

perl -MPOSIX -MPOSIX::strptime -e \
    'print mktime(POSIX::strptime("2009-07-30 04:30", "%Y-%m-%d %H:%M")), "\n"'

$ date +%s.%N

where (GNU Coreutils 8.24日期手册)

+%s, seconds since 1970-01-01 00:00:00 UTC +%N，纳秒(000000000..999999999)

示例现在输出1454000043.704350695。 我注意到BSD手册的日期没有包括关于标志+%s的精确解释。

在锈:

use std::time::{SystemTime, UNIX_EPOCH};


fn main() {
    let now = SystemTime::now();
    println!("{}", now.duration_since(UNIX_EPOCH).unwrap().as_secs())
}

在Haskell…

要将它作为POSIXTime类型返回:

import Data.Time.Clock.POSIX
getPOSIXTime

整数形式:

import Data.Time.Clock.POSIX
round `fmap` getPOSIXTime

public static Int32 GetTimeStamp()
    {
        try
        {
            Int32 unixTimeStamp;
            DateTime currentTime = DateTime.Now;
            DateTime zuluTime = currentTime.ToUniversalTime();
            DateTime unixEpoch = new DateTime(1970, 1, 1);
            unixTimeStamp = (Int32)(zuluTime.Subtract(unixEpoch)).TotalSeconds;
            return unixTimeStamp;
        }
        catch (Exception ex)
        {
            Debug.WriteLine(ex);
            return 0;
        }
    }