Re: How do I do this

2002-06-10 Thread Tor Hildrum
> sub settings_smi_edit { > $storeline = $q->param('id'); > > open(FILE, "info/smileset.txt"); > @file = ; > close(FILE); > > foreach $i (@file) { > ($number, $image, $name, $text, $used) = split(/\|/, > $i); > if ($number eq $storeline) { > @numb = ($number, $image, $name, $text, $used); > } >

How do I do this

2002-06-09 Thread Andrew Rosolino
sub settings_smi_edit { $storeline = $q->param('id'); open(FILE, "info/smileset.txt"); @file = ; close(FILE); foreach $i (@file) { ($number, $image, $name, $text, $used) = split(/\|/, $i); if ($number eq $storeline) { @numb = ($number, $image, $name, $text, $used); } } } Ok that I been tryin