Как создать строку с помощью grep в Perl

Как найти строку в perl.

Переменная sessionWeb содержит HTML-код веб-страницы. Я хочу найти здесь «активные сеансы» и распечатать, как показано ниже. Например, строка на веб-странице будет

"2 active Sessions, 0 passivated Sessions (more stats...)"

Ожидаемый результат:

2 активных сеанса.

Я пробовал следующий код, но он не работает?

 $sessionStr="active Sessions";
     $sessionCount =~ grep( /$sessionStr/,$sessionWeb);