Select Code to Download

#include <stdio.h>

...
    printf( "Returning %d\n", c );
    return c;
}

#! perl -slw
use strict;
...
    or die $!, $^E;

print getChar() for 1 .. 10;

C:\test>t-w32api.pl
Returning 41
...
82
Returning 144
144