help required reg eval qq

user1357

Hi All,

Could you please explain the difference b/w the below codes?

when qq is used with eval and without () the o/p is different.

Expand|Select|Wrap|Line Numbers

  
$hex1='\xd1';
 
$conv = eval qq "$hex1";
 
print "CONV IS $conv \n";

o/p is as follows

CONV IS SCALAR(0x183f1c4)

Expand|Select|Wrap|Line Numbers

  
$hex1='\xd1';
 
$conv = eval qq ("$hex1");
 
print "CONV IS $conv \n";

o/p is as follows
CONV IS ╤

KevinADC

Hi All,

Could you please explain the difference b/w the below codes?

when qq is used with eval and without () the o/p is different.

Expand|Select|Wrap|Line Numbers

$hex1='\xd1';

$conv = eval qq "$hex1";

print "CONV IS $conv \n";

o/p is as follows

CONV IS SCALAR(0x183f1c4)

Expand|Select|Wrap|Line Numbers

$hex1='\xd1';

$conv = eval qq ("$hex1");

print "CONV IS $conv \n";

o/p is as follows
CONV IS ╤

In the first example, the double-quotes are the delimiter for the qq operator, so the code is the same as:

Expand|Select|Wrap|Line Numbers

 
$hex1='\xd1';

$conv = eval $hex1;

print "CONV IS $conv \n";

In the second example the () are the delimiter for the qq operator, so the code is the same as:

Expand|Select|Wrap|Line Numbers

 
$hex1='\xd1';

$conv = eval "\"$hex1\"";

print "CONV IS $conv \n";

help required reg eval qq

Post your reply

Similar topics