You could to this with a little eval magic (see the caveats, later). What I have in mind would be something like the following:

  if( $sampleData =~ /$searchString/ ) {
      print eval qq{"$outputString"};
  }
[download]

The outer qq{} quote is used to generate an evaluateable string by adding double quotes around the original. When evaluated, this new string interpolates your variables into place.

There are a few problems with this approach:

• You may need to escape characters in the string (: at a minimum)
• This is effectively compiled at run-time, which means unexpected errors can result.
• You need to carefully scrub the output strings to prevent injection attacks.

You are basically trusting the incoming string to be safe to evaluate and run as code. This is not always a valid or safe assumption.

---

---

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

• How do I compose an effective node title?
• How do I post a question effectively?
• Markup in the Monastery

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		&
	<		&lt;
	>		&gt;
	[		&#91;
	]		&#93;

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.