Help for this page

Select Code to Download

Select or download this

  "abcde" =~ /(.)(.)(.)(.)(.)/;
  my $var = $4;
  print join ', ', grep !/\D/, keys %::;