print CSV $_, scalar <$fa>, scalar <$fb>, scalar <$fc>;

##</code><code>##

  my $line_a = <$fa>;
  my $line_b = <$fb>;
  my $line_c = <$fc>;

  print CSV $_, $line_a, $line_b, $line_c;