wie kann ich "my $jetzt = time()" in dbfile eintragen?

[Alain]

Hallo,
Ich möchte einen sogenannten time-stamp  in eine db-file setzten,aber
mit "my $jetzt = time();" gehts nicht.Es sollte doch eine 10 stellige zahl sein,die eingetragen wird?
 Fehlt da noch was wie localtime oder so?
Ich hab hier ein Beispiel:
use DB_File;
my $file = 'login';
my $users = 'nouser';
my $jetzt = time();
my $bis = $jetzt + 1;
my %dbfile;
my $db = tie (%dbfile , "DB_File", $file, O_RDWR|O_CREAT, 0644);
my $fd = $db->fd;
open(DBM, "+<&=$fd");
flock(DBM, LOCK_EX);
my ($ip_last, $count_last, $bis) = split(/\*/,$dbfile{$users});
if ($ip_last ne $ip_now||$jetzt < $bis)
{
$count_last++;
}
........

aber so gehts anscheinend nicht?!
Gruss
Alain