if( $page =~ m/keyword\s+(\d+)/ ) {
   print "Found the keyword, and retrieved a value of $1\n";
}