webgui/t/supporting_collateral/Upgrade/dbh.pl
2010-07-06 06:16:26 -05:00

3 lines
140 B
Perl

my $totalAssets = dbh->selectrow_array('SELECT COUNT(*) FROM asset');
::is $totalAssets, $::totalAssets, 'dbh function working correctly';