Datum in long Format konvertieren

[Masipulami]

Hallo zusammen,

ich bräuchte mal kurz eure fachkundige Hilfe.

Für die dynamische Erzeugung von Dateinamen muss ich einen Timestamp erzeugen.

Bisher war mein Ansatz folgender:

sub time_stamp {
  my $self = shift;
  my ($d,$t,$ts);
  my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);

$year += 1900;
  $mon++;
  $d = sprintf("%4d-%2.2d-%2.2d",$year,$mon,$mday);
  $t = sprintf("%2.2d:%2.2d:%2.2d",$hour,$min,$sec);
  $ts = $d . "-" . $t . "\n";

$self->_print("generated timestamp: " . $ts . "\n");
  return($ts);
}

Mein Chef meinte gerade allerdings, dass er den Timestamp gerne im "long" Format haben möchte. Also als Ergebnis quasi nur ne lange Zahl, die aus dem Datum generiert wird.

Habe allerdings leider keine Ahnung wie ich das machen soll.

Hoffe mir kann da jmd. weiterhelfen.

Vielen Dank schon mal und

viele Grüße,
Masipulami