So I've been using Tie::File to edit a file

tie @array, 'Tie::File', "$the_dir$filename", recsep => ']', autochomp => 0;

I use the recsep => ']' because the data in the file is enclosed in brackets. Separating it on a closing bracket seemed easier than trying to figure out how to deal with the records that span multiple lines.

This all works fine except that at the end of the file are comments not enclosed in brackets. Tie:File of course adds a final closeing recsep (in this case a ']'). I really don't want it there. Short of untieing the file and reopening it and removing the final }, is there a way to easily get rid of the extra }? Is it possible to define multiple characters as the recsep (like either ']' or '/')? Am I just doing this wrong?

In case anyone needs to see the sample data in the file: 

/* comment */
[record1,
     param1:value1
     param2:value2
]
[record2,
     param2:value2
]
/* end all records for 2012-06-21 */

In reply to tie file and multiple record seperator by xorl

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.