Help for this page

Select Code to Download


  1. or download this
    my $circuit_id = ( $if_descr =~ /([^.]*)(?:\.(.*))?/
   ? $1 . (defined($2) ? $2 : '')
   : undef
);
  2. or download this
    (my $circuit_id = $if_descr) =~ s/\.//;