my $foo = $bar;
print "hi $foo\n";
print 'hi ', $foo, "\n";

##</code><code>##

ppi_dumper very-easy-print-interpolation2.pl

##</code><code>##

PPI::Document
  PPI::Statement::Variable
    PPI::Token::Word    'my'
    PPI::Token::Whitespace      ' '
    PPI::Token::Symbol          '$foo'
    PPI::Token::Whitespace      ' '
    PPI::Token::Operator        '='
    PPI::Token::Whitespace      ' '
    PPI::Token::Symbol          '$bar'
    PPI::Token::Structure       ';'
  PPI::Token::Whitespace        '\n'
  PPI::Statement
    PPI::Token::Word    'print'
    PPI::Token::Whitespace      ' '
    PPI::Token::Quote::Double   '"hi $foo\n"'
    PPI::Token::Structure       ';'
  PPI::Token::Whitespace        '\n'
  PPI::Statement
    PPI::Token::Word    'print'
    PPI::Token::Whitespace      ' '
    PPI::Token::Quote::Single   ''hi ''
    PPI::Token::Operator        ','
    PPI::Token::Whitespace      ' '
    PPI::Token::Symbol          '$foo'
    PPI::Token::Operator        ','
    PPI::Token::Whitespace      ' '
    PPI::Token::Quote::Double   '"\n"'
    PPI::Token::Structure       ';'