if (-e $DSNlasttim) { # Check if file exists
        open (LASTTIM,"$DSNlasttim") || die "OPEN INPUT ERROR $DSNlast
+tim: $!\n";
        $lasttim = do { local $/; <LASTTIM> };
        close(LASTTIM);
        ($lastatmt) = split(/ ~ /, $lasttim);
        $delayrem = $delay - $currtime + $lastatmt;    # Get remaining
+ delay, if any
        if ($delayrem > 0) {$too_qik};    
}
[download]