#! perl -slw
use Win32::API;
my $o2basic = new Win32::API( "thinBasic_Oxygen.dll","o2_basic", [P], P );
my $o2exec = new Win32::API( "thinBasic_Oxygen.dll","o2_exec", [P] );
my $src = " dim a as quad : dim i as long: for i=1 to 100000000: a=a+i : next i: Print str a: mov eax,a  :terminate ";
$o2basic->Call( $src ); #gives an error here
#what should i do here with o2exec ??:
#$o2exec->??;