use strict;
use warnings;

$_ = 'tenpixblack">TEXT To GET.</td>';
$_ = m/tenpixblack">(.*?)<\/td>/ ? $1 : '';
print;