Help for this page

Select Code to Download


  1. or download this
    my $month = qr{(?<month>\w+)};
# ...etc
my $re_dn = qr{^$month (\d+) (\d{2}:\d{2}:\d{2}) .*: eth(\d): link dow
+n};
my $re_dn = qr{^$month (\d+) (\d{2}:\d{2}:\d{2}) .*: eth(\d): link up,
+ (\d+)Mbps, ([^,]+), lpa (\w+)};
  2. or download this
    # sketch, totally untested

...

# compose patterns
my $re_dn = qr{^$p{month} $p{day} ...};