For those of you who didnt read my first post.... I can successfully open a text file and display the contents on the web > >>using a perl script, however when the text file becomes too large my script > >>hangs. The log file is less than 8k when it does this. How can I allow a > >>larger text file to be displayed? Does anyone have a suggestion? Thanks already for all the input! Here is the code...please dont laugh too loudly... #!/usr/local/bin/perl require "subparseform.lib"; &Parse_Form; #volitile data from searchform.html $aptsize = $formdata{'aptsize'}; $orent = $formdata{'orent'}; $zone = $formdata{'zone'}; $pricerange = $formdata{'pricerange'}; $month = $formdata{'month'}; $pets = $formdata{'pets'}; $smoke = $formdata{'smoke'}; #opens rental.txt open (LOG, "<rental.txt") || &ErrorMessage; @logmessages = <LOG>; close (LOG); #splits log file into seperate entries foreach $event (@logmessages) { @event = split (/=/, $event); #splits entries into seperate scalars #print"@pevent\n"; foreach $pevent (@event) { @pevent = split (/,/, $pevent); } #compares volitile data against rental.txt #sorting.... if ($pevent[0]=~/$aptsize/) { if ($pevent[1]=~/$orent/) { if ($pevent[2]=~/$zone/) { if ($pevent[3]=~/$pricerange/) { if ($pevent[4]=~/$month/) { if ($pevent[5]=~/$pets/) { if ($pevent[6]=~/$smoke/) { print" <html>.....................</html>\n"; } else { } } else { } } else { } } else { } } else { } } else { } #end sorting!sub ErrorMessage { exit; } } } Thanks agian! -Gene ________________________________________________________________ Get FREE voicemail, fax and email at http://voicemail.excite.com Talk online at http://voicechat.excite.com ===== Want to unsubscribe from this list? ===== Send mail with body "unsubscribe" to macperl-request@macperl.org