Re: Unexpected deletion of data using


Do you know where your variables are?
	PerlMonks

Re: Unexpected deletion of data using > operator

by n3toy (Hermit)

on Dec 07, 2008 at 18:26 UTC ( #728758=note: print w/replies, xml )

Need Help??

in reply to Unexpected deletion of data using > operator

Not initializing a variable is something that has bitten me before! And, of course I assume right away it is my code or logic and not something simple. (Usually, it ends up being a combination of both!)

Would this snippet meet your needs?:

foreach my $line (@customerarray) {
    my ($memono, $cusref, $datestamp) = split '::', $line;
    if ( ($timestamp - $datestamp) > 1296000 ) {
        next;
    } else {
        $line = $line . $line . "\n";
    }    
}

print FH "$item";
[download]

I hope this is somewhat helpful.

Jamie

Comment on Re: Unexpected deletion of data using > operator Download Code

Replies are listed 'Best First'.
Re^2: Unexpected deletion of data using > operator by jonnyfolk (Vicar) on Dec 07, 2008 at 19:49 UTC
Thanks for your input, but surely bringing $item out of a hat at the end is what you were criticising me for in the first place?? :) davidrw's reply above (the most compressed version) removes the problem (typo not withstanding), simply by copying and pasting over my previous code. Therefore there must be a problem in that code, but I have not yet found it. Cheers.	[reply]
Re^3: Unexpected deletion of data using > operator by n3toy (Hermit) on Dec 07, 2008 at 23:01 UTC
Whoops... Add: `use MagicHat;` to the top of the snippet. :-) This will teach me to test code before posting.	[reply] [d/l]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://728758]
help

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others romping around the Monastery: (2)

As of 2023-06-10 07:40 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?