Thread: 'Out of memory'?
Results 1 to 1 of 1
Related
-
Help with Perl DBI memory leak Forum: CGI Perl Forum
Replies: 0 -
global memory Forum: HTML Forum
Replies: 1
-
09-10-2006, 05:34 PM #1
'Out of memory'?
Ooo..kay.
Purpose: generating an HTML page based on the user name.
Method:
I got this array of hashes.
Each element of the array corresponding to one HTML table row.
Based on the ( $album[$i] {'access'} -> {$user} ) a row is or is not printed.
I got 26 rows.
A sample hash element:
Code:{ url => "http://picasaweb.google.com/yitzchokGood/NatureStills", name => "Nature/Still", size => 54, status => "c", location => "N/A", created => "?", modified => "?", access => { master => true, nathan => true, every => true}, account => "ygood" },
Um. The output code:
Code:... for ( $i = 1; $i <= @album; $i++) { if ( $album[$i] {'access'} -> {$user} ) { print qq~ <TR> <TD><a target="content" href="$album[$i]{'url'}">$album[$i]{'name'}</a></TD> <TD>$album[$i]{'size'}</TD> ~; if ( $album[$i]{'status'} eq 'o' ) { print "<TD><B>Open</B></TD>"; } else { print "<TD>Closed</TD>"; } print qq~ <TD>$album[$i]{'location'}</TD> <TD>$album[$i]{'created'}</TD> <TD>$album[$i]{'modified'}</TD> <TD>$album[$i]{'account'}</TD> ~; if ( $user eq "master" ) { # if ( $album[$i] {'access'} -> {"public"} ) { # print '<td style="text-align: center;">X</td>'; # } else { # print '<td style="text-align: center;"> </td>'; # } if ( $album[$i] {'access'} -> {"every"} ) { print '<td style="text-align: center;">X</td>'; } else { print '<td style="text-align: center;"> </td>'; } if ( $album[$i] {'access'} -> {"nathan"} ) { print '<td style="text-align: center;">X</td>'; } else { print '<td style="text-align: center;"> </td>'; } } print "</tr>"; } }
Code:... <td style="text-align: center;">X</td><td style="text-align: center;">X</td></tr> <TOut of memory! R> <TD><a...
And it also ends the output a bit early.
What's going on?
Cloudjiffy- PaaS for Developers
10-05-2020, 12:30 AM in Web Hosting Forum