Tests for Embperl - Execute Get Session Data

Tests for Embperl - Set Session Data fdat:

udat:

^ ok $num=\d+$

$mdat{cnt} = --
$udat{cnt} = --
sessions: ^ ^- ^- ^- ^- ^- ^-
.*?<\/td> HASH.*?<\/td> ^- <\/tr> ^- ^-
.*?<\/td> HASH.*?<\/td> ^- <\/tr> ^- ^-
.*?<\/td> HASH.*?<\/td> ^- <\/tr> ^- ^-
.*?<\/td> HASH.*?<\/td> ^- <\/tr> ^- ^-
.*?<\/td> HASH.*?<\/td> ^- <\/tr> ^- <\/table> fdat:

udat:

a 1

^ ok $num=(1|6)$
$mdat{cnt} = --
$udat{cnt} = --
Tests for Embperl - Set Session Data fdat:

udat:

a 1

^ ok $num=(1|6)$
$mdat{cnt} = --
$udat{cnt} = --
sessions: ^ ^- ^- ^- ^- ^- ^-
.*?<\/td> HASH.*?<\/td> ^- <\/tr> ^- ^-
.*?<\/td> HASH.*?<\/td> ^- <\/tr> ^- ^-
.*?<\/td> HASH.*?<\/td> ^- <\/tr> ^- ^-
.*?<\/td> HASH.*?<\/td> ^- <\/tr> ^- ^-
.*?<\/td> HASH.*?<\/td> ^- <\/tr> ^- <\/table>