~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to lib/GenTest/Random.pm

Update pushbuild scripts to use 5.0.91 instead of 5.0.87 for comparison runs on Windows.

Show diffs side-by-side

added added

removed removed

Lines of Context:
283
283
 
284
284
sub time {
285
285
        my $prng = shift;
286
 
        return sprintf('%02d:%02d:%02d.%06d',
 
286
        return sprintf('%02d:%02d:%02d',
287
287
                   $prng->uint16(0,23),
288
288
                   $prng->uint16(0,59),
289
 
                   $prng->uint16(0,59),
290
 
                   $prng->uint16(0,999999));
 
289
                   $prng->uint16(0,59));
291
290
}
292
291
 
293
292
sub datetime {
297
296
 
298
297
sub timestamp {
299
298
        my $prng = shift;
300
 
        return sprintf('%04d%02d%02d%02d%02d%02d.%06d',
 
299
        return sprintf('%04d%02d%02d%02d%02d%02d',
301
300
                   $prng->uint16(2000,2009),
302
301
                   $prng->uint16(1,12),
303
302
                   $prng->uint16(1,28),
304
303
                   $prng->uint16(0,23),
305
304
                   $prng->uint16(0,59),
306
 
                   $prng->uint16(0,59),
307
 
                   $prng->uint16(0,999999));
 
305
                   $prng->uint16(0,59));
308
306
}
309
307
 
310
308
sub enum {