Print the Global special constant Variable

[aantonyselvam]

How should I print the Global special constant Variable in the double quote. I should not use the temporary variable also to store

print  "This is the package =>" . __PACKAGE__ . "<=";
(or)
$pack = __PACKAGE__;
print "This is the package => $pack <=";

instead of the above statement I need to use the variable in print statement as follows.

print  "This is the package =>  __PACKAGE__ <=";

[Anonyrnous Monk]

If you absolutely must interpolate the constant (I'm not sure why, and what's wrong with your first solution using concatenation...), you can say:

print "This is the package => ${\__PACKAGE__} <=";
# or 
print "This is the package => @{[__PACKAGE__]} <=";

The idea is just to create a reference to whatever you want to interpolate, and then dereference it using the double-quote-interpolated sigils ${...} or @{...}.

[AnomalousMonk]

printf is a print statement. Why not just use that?

>perl -wMstrict -le
"printf 'This is the package => %s <=', __PACKAGE__;
"
This is the package => main <=

[vetrivel]

The below code is used to print the Global special constant value
print "Program Name is ${\__FILE__} " ;