Re^2: a perl code syntax help

thanks for your reply and pointer to the doc.
I just do not want to write the same code again and again, can I write a function and pass 'onload' or 'onChange' in a variable? so that it would resolve the $func value as -onChange or -onload ?

Comment on Re^2: a perl code syntax help

Replies are listed 'Best First'.
Re^3: a perl code syntax help by marto (Cardinal) on Jul 28, 2014 at 11:25 UTC
You could make life much easier for yourself by using a templating system rather than creating HTML in this manner, but you already know that.	[reply]
Re^3: a perl code syntax help by hexcoder (Curate) on Jul 28, 2014 at 21:08 UTC
Yes, we can. Like that (untested): `... my $trigger = 'onload'; $html .= <<END; ... <td bgcolor="#EEEEEE">@{[ $qry->popup_menu(-id=>'ID +', -name=>'PS', -size=>10, -values=>$array_ref, -labels=>$hash_ref, +-${trigger}=>"fetchData(id,'','','')") ]}</td> </tr> </table> END` [download] The original code did already interpolate a list expression in the heredoc string (`@{[ ... ]}` was already present). So you just have to replace the fixed text part (`onChange`) in the above expression (`...`) with a string variable (here I used `$trigger`).	[reply] [d/l] [select]


Perl: the Markov chain saw
	PerlMonks