>>>>> "mr" == marcos rebelo <ole...@gmail.com> writes:

  mr> Ugly but may work, with a simple eval
  mr> use strict;
  mr> use warnings;

  mr> my $var = '$str. q( abc_xyz)';
  mr> my $str;

  mr> for(my $i=1;$i <= 5; $i++){
  mr>    $str = $i;
  mr>    my $line = 'Line: '.eval $var;
  mr>    print "$line\n";
  mr> }

NEVER do that for such a simple problem. eval string is a last resort
when no other technique can work well.

and please learn to edit quoted email. there is no reason to see the
whole original email. also read a full thread before answering is a good
thing. this query was answered well several times already.

uri

-- 
Uri Guttman  ------  u...@stemsystems.com  --------  http://www.sysarch.com --
-----  Perl Code Review , Architecture, Development, Training, Support ------
---------  Gourmet Hot Cocoa Mix  ----  http://bestfriendscocoa.com ---------

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to