open FILE,"</test";              
for(<FILE>){                     
	$Text .= "$_\x012";          
}                                
close FILE;                      
                                 
$Inputfield = $W2->AddTextfield( 
	-name     => "input",        
	-left     => 5,              
	-top      => 1,              
	-text     => "$Text",        
	-width    => 280,            
	-height   => 170,            
	-foreground => [0,0,0],      
	-background => [255,255,255],
	-tabstop  => 1,              
	-multiline => 1,             
	-wrap=>1                     
);