Help for this page

Select Code to Download


  1. or download this
    my %answers ;
for ( @array ) {
  /::([\S]+)[^:]*:(.*)/  and $answers{$1} = $2 ;
}