Right, noob here of sorts. Ill try and be brief.
I have a piece of code that loops through a csv sheet and parses th data. In particular, I need the date to increment when the time is 23:xx:xx in a corresponding cell (long story to do with GMT/BST I wont get into)
So, a line of data being fed into the script looks like this.
program,xx.xx.xx.xx,28/05/08,23:48:31,28/05/08,17:53,data
I stick each line in an array seperated by the comma. I then access the relevant area of the array.
foreach(<FH1>) { my @test = split(); $date = $test[2]; $first_seen = $test[3]; if ($first_seen = /(23\:\d{1,2}\:\d{1,2})/) { $first_seen = $1; $first_seen =~ s/23/00/i; my $delim = "/"; my ($day,$month,$year) = split($delim, $date); $day++; my $new_day = join "/", "$day","$month","$year"; ##splice(@test, 3, "$new_day");
Now, the last line is the problem. I try adn stick that back in the array, but i get this warning.
The script doesnt die....but the 4th Element of the array is missing(the spliced bit) and its critical its there.
Any ideas of how to force it into the array? Make perl see it as a string perhaps?
In reply to Warnings - Argument isnt numneric by weezer_316
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |