...is the code:
#!/usr/bin/perl
open (WARNING, "/home/josh/warning.txt");
@arwarn = <WARNING>;
$stwarn = join('', @arwarn);
if($stwarn =~ m/LON(.*)TIME/) {
# I've also tried m/LON(.*)\nTIME and \r, etc and it works in some cases when those appear #
$coords = $1;
}
@metdata = split(/\s+/...