Its the same as if you wrote 3 different files and used perl to run each file, exactly as if you wrote this
use Path::Tiny qw/ path /; path( 'first')->spew( "$$var$transf" ); do 'first'; path( 'second')->spew( $$var.$transf ); do 'second'; path( 'third')->spew( '$$var'.$transf ); do 'third';
If your purpose is calculator, see dont use eval for calculator , and see safest undumper
In reply to Re: Please help me understand string eval better
by Anonymous Monk
in thread Please help me understand string eval better
by perltux
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |