Help for this page
my $syncfile = 'sync.fred'; my $start = (stat $syncfile)[9]; ... } print "Now we can read the pipe\n";