m/(\d+\.\d+\.\d+\.\d+)/;
my $PRTABL=$1;
s/\w{3} \w{3} \d+ \d+:\d+:\d+ \d{4}/$clocks{$PRTABL}/; #replaces with nada?
print $clocks{"$PRTABL"}; # This works?