$string = qq(           # start the quote
             func(1     # push down to second level
                   ln(  # push down to third level
                      e) # pop up to second level
                  );     # pop up to first level
            );           # finish the quote