dim data;
loop {
   data read;
   data print;
}