this is test only 1 Baki: 9.70 this is test only 2 Baki : 9.30 this is test only 3 Baki : 9.00 #### open(CREDIT, "c/Log.txt"); while (my $credit = ) { chomp($credit); print ("$credit\n"); } close(CREDIT);