Re: Looking for regex

As a side note, you may want to use the everything up to and including
the hour if your file can cover a time period longer than 24 hours:


#! /usr/bin/perl

use strict;
use warnings;

my %seen;
while (my $line = <>) {
print $line unless $seen{substr $line, 0, 13}++;
}
.