use Data::Dumper;
my @exp_stat;
@exp_stat = expect('-re', 'session:\n$');
print Dumper(\@exp_stat);