$thisHash('price') = $1 if $pageContent =~ s/prices: \<table\>.+?\<\/table\>//s
$thisHash('cas') = $1 if $pageContent =~ s/CAS: \<b\>\d+-\d{2}-\d+\<\/b\>//s

##</code><code>##

$pageContent =~ /(CAS: \<b>\d+-\d{2}-\d+\<\/b\>|).*?(prices: \<table\>.+?\<\/table\>|)/s