Re: Interpret a string that contains strings

[choroba]

Single quotes don't interpolate variables. '$format ' (see line 9) contains a dollar sign, and letters f, o, r, m, a, t, and a space.

$formatString = "$formatString$format ";

Similarly, use "\n" instead of '\n' on line 13.

[bArriaM]

I shouldn't drink wine and code at the same time... Thank you Sir, it works like a charm after the changes, I wanted to make it too complicated!

sub printfToFile {
  my $file = shift;
  my $format = shift;
  my $arrayCount = @_;
  
  my $formatString;
  
  for (my $r = 1;$r <= $arrayCount; $r++) {
      $formatString = $formatString."$format ";
  }
  
  $formatString = trim( $formatString );
  $formatString = $formatString."\n";
  
  open IO, ">>$file" or die "Cannot open $file for output: $!\n+";
  printf IO "$formatString", @_;
  close IO;
}