read (INPUT, $test4, 3);