#!/usr/bin/perl -w
use strict;
$|=1;  #unbuffer stdout

print "File split start time is ", scalar localtime();