Might I recommend a different way to build up your string which may be a bit closer to what you're trying to accomplish? (I'm an advocate of making my solutions look like the problem, not like the solution.)

I'm assuming your "for loop" is using a list such as @args.

my $call = '$jobs->$func(' .
  join(', ', map qq{"$_"}, @args) .
  ')';

my %jobstats = eval $call;
[download]

I'm avoiding all the chops as I don't add more commas than needed. That said, even the way you're doing it, you could remove the chops - trailing commas don't bother perl at all. My guess is that perl would parse and discard the comma faster inside the compiler than by using chop anyway.

Anyway, this code builds your method call in exactly the same way that you normally do. You convert your arguments to be quoted (converting one list to another is a map), you put commas between them (putting a string - even if it were an empty string - repeatedly between other strings is a join), and you put stuff before and after (with the dot operator).

Using the escape (backslash) as has already been suggested is one way to do this when you need to use double quotes. But I find escapes to be distracting and like to avoid them when reasonably possible.

Belgarion is correct in what your problem is. I'm just offering another way to approach your basic problem that may prove better.

Note: Even better for this scenario is:

my %jobstats = $jobs->$func(@args);
[download]

My guess is that the line:

my $call = ' $jobs->$func ($arg) ' ;

Is not interpolating (expanding) the $arg variable. Use double quotes and escape the dollar signs, like so:

my $call = " \$jobs->\$func ($arg) " ;

What I wonder, and maybe this isn't possible for some reason, but why do you need an eval? Can't you replace

$arg .= "\"" . $str . "\", ";
[download]

with

push @args, $str
[download]

and then instead of

my %jobstats = eval $call
[download]

just use

my %jobstats = $jobs->$func( @args )
[download]

I like to reduce the number of times I have to use eval, and I think most monks would agree with me. Try to get rid of it if possible.

    -Bryan

my %jobstats = eval $call;
die("eval failed: $@") if $@;
[download]

Refer to Belgarion's reply.