Use an array instead of multiple $out_reqN variables with the index in their name.
Also, -text doesn't expect a reference, but a normal string.
...
my @out_req = (
'1. Carpet Plot Data',
"2. Laminate Properties",
"3. Laminate Stresses",
"4. Laminate Strains",
"5. Circumferential and Radial Stresses/Strains",
"6. Displacements",
"7. Strains Per Ply",
"8. Stresses Per Ply",
"9. Failure Criteria Per Ply",
"10. Automatic Search for Failure",
);
for my $label (@out_req) {
$chk_{$n} = $out_req_frm -> Checkbutton(-text=> $label,
...
}
%chk / %chk_ would also more naturally be arrays (not hashes), as the index $n is just a counter.
See perldata and perldsc.
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.