How do you get current timestamp in Perl?

#!/usr/bin/perl

use DateTime;

my $dt=DateTime->now;

$TimeStamp=$dt->ymd . "_" . $dt->hms;