Standard caveat: your code should start with "use strict; use warnings;".

If you do that, you'll see that you need to explicitly define @jobs, $date, $job, @jobs and $date.

If you want to test with a DATA block, you need to change from <FH1> to <DATA>.

Then you'll get uninitialized values for your substitution defining, and later using, $date.

I took the liberty of changing

my $date =~ s/\[//;

to 

my $date ='';

if ( $_ =~ /\[(\S+)\s/ )
  { $date = $1; }

[download]

This will get you to the point where you'll be able to start debugging your code. Keep in mind that get_cur_time returns a value of the form MM/DD/YY, while $date will contain a value of M/DD/YY. Fixing this is left as an exercise to the reader.

Please realize that print statements are your friend. So is the Perl debugger.

Good luck with your project.

In reply to Re: Parsing Unstructured Data by apl
in thread Parsing Unstructured Data by raj8

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.