open FILE, "myfile" or die "I am not able to open the file to read";

while (<FILE>)
{
   chomp;
   $string .= "$_, " ;
}

close(FILE);

chop($string);  #removing the last balan space from the string.
chop($string);  #removing the last , from the string.