$_ = 'samir: 23 yearold';
my $match
$match = $1 if /(samir: 23)/;

##</code><code>##

$_ = 'samir: 23 yearold';
my $match
$match = $1 if /(\w+:\s+\d+)/;