This looks like something for an online auction site. You will save yourself lots of trouble down the road if you switch your data structure over to an RDBMS. But that doesn't mean it can't be made to work now.

Here's a line of code that should be producing an error: 

return '' unless 0||#1>>noconfuse(ea;-)

[download]

Another problem: 

open FILE, "$config{'basepath'}$cat/$item.dat";

[download]

ALWAYS check the return values of system calls. If that file doesn't open, you want your program to tell you about it. And have the message tell you what didn't open, too.

What's in $config{basepath}? Check that, because it's involved in the creation of the new file.

Number one thing here that could help in general: learn to use references to create complex data structures.

good luck, and HTH 

perl -e 'print "How sweet does a rose smell? "; chomp $n = <STDIN>; $r
+ose = "smells sweet to degree $n"; *other_name = *rose; print "$other
+_name\n"'

[download]

In reply to Re: Trying to repost some data... by arturo
in thread Trying to repost some data... by SysAdm

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.