while(  $content =~ m{$bigone}si  ){
   # $1 $2  $3 ... are defined here
}