open(FILEOPENED, "$fileopened") || die "couldn't open the file! $!";
 
   while ($data = <FILEOPENED>) {
      print $data;
            
             
   }
  close(FILEOPENED);
  }