my $pid = fork;
    die "Fork failed: $!" unless defined $pid;
    unless ($pid) {
        exec "C:\\block.exe";
        die "exec failed: $!";
    }
    print "processing second line...\n";