On 9/19/2010 7:48 AM, Ludwig, Michael wrote: >> Could you tell me how create a time object of VBS in perl? Below >> statement define a starting time and pass it to the getdata function >> to get data in VBS: >> >> start_time = DateSerial( 2003, 01, 31) + TimeSerial( 6, 0, 0) >> data_array = lpd.getdata(id, start_time) >> >> But I don't know how to translate it into perl. >> Since I intend to rewrite all vbs scripts, it will be a big problem! > Using Windows Script Files (.wsf) > http://msdn.microsoft.com/en-us/library/15x4407c%28VS.85%29.aspx > > WSF might be helpful to you. It allows you to have several engines > work jointly. You might be able to keep the parts in VBS that are not > practical to port to Perl. It is XML, so you can use Unicode in your > script. >
If you are doing a bunch of conversions then you might want to look at the Perl Dev Kit as it has a vbscript to perl converter John _______________________________________________ ActivePerl mailing list ActivePerl@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
