number". Ah, this helps alot thanks! I just didn't find that before. is Well the number it uploads is not the float, in this case double, that I want it to be. I'll need to do a strtod. Martin.
number". Ah, this helps alot thanks! I just didn't find that before. is Well the number it uploads is not the float, in this case double, that I want it to be. I'll need to do a strtod. Martin.
< XXXX@XXXXX.COM > wrote in comp.lang.perl.misc: [...] Please be specific! Telling us it is not what you want it to be helps no-one. What is the data your code offers to the DB? How does the DB receive it? What does the DB give back, if anything? That's the kind of info we need. No, you need it to be what the documentation of your database interface wants it to be. I have no idea what it expects, but I doubt it's described as "a strtod": Anno
above it accepted that helps it? The data point ------- The data (pt, x) P1 4.50015068000000D-004 ------- $number = 4.50015068000000D-004 This is now just a string, I've been incorrectly feeding this to the database, where it is expecting a double( double(20,6)). Which explains why the DB returns "4.500151" I need to convert the string stored in $number to a double number. string to double (strtod). So from perldoc -q "is a number", I've used: use POSIX qw(strtod); my $double = strtod($number); However, the strtod function doesn't like the "D" in my number, ie 4.50015068000000D-004 needs to be 4.50015068000000e-004. So I do a quick substitution. Thanks for your pointer, sorry for my being vague. Martin.
1.Newbie quesion: Scientific notation
Hi, I'm trying to upload some data into a MySQL database. Could someone please advise me how I handle scientific notation? What I have sofar: ------- The data (pt, x) P1 4.50015068000000D-004 ------- My regex expressions, I've been experimenting with: regex1: P\d+\s+(-?([0-9]+(\.[0-9]*)?|\.[0-9]+))/) does not catch the scientific notation regex2: P\d+\s+([+-]?(\d+(\.\d*)?|\.\d+)([eEdD][+-]?\d+))/) does catch the scientific notation. I then say, $number = $1; ------- # Insert data $dbh->do("INSERT INTO data(x) VALUES (?)",undef, $number); ------- How do I upload the number to the database? If I do it as above it is incorrect. Thanks your help. Martin.
2.Convert Scientific Notation to decimal equivalent
How can I detect this, I have been running some code for a few days to develop some files and ran into the situation where I am getting the following data for input: 14.95313 14.45312 0 14.95313 1.570813E-015 0 14.95313 -14.45313 0 -14.95313 -28.90625 0 -14.95313 -14.45313 0 -14.95313 1.570813E-015 0 -14.95313 14.45312 0 14.95313 -28.90625 0 0 -28.90625 0 -14.95313 28.90625 0 0 28.90625 0 14.95313 28.90625 0 And my code is skipping some lines as it checks for any erroneous data: next if grep (/[^0-9.-]/, @data); But that thinks the scientific notation is bad. I searched the net and didn't find anything. How can I match this specific pattern and convert it? Thanks! jlc
3.print flips to scientific notation when integer exceeds 15 decimal digits
Philip Potter wrote: > I would guess that these numbers are being stored in floats, and that > these floats are 64-bit double precision, with 53 bits of mantissa. > That means that there are just under 16 decimal digits of precision in > these numbers. print and friends seem to automatically print no more > than 15 digits of precision: > [...] > You probably want to use bignums instead. If you are dealing with > large integers, where precision down to the units place is important, > you definitely want bignums and not floats. > > H:\>perl -e "use bignum; my $i = 999999999999997; print $i, ' ',$i+4,qq[\n];" > 999999999999997 1000000000000001 > > the bignum pragma makes $i into a Math::BigInt object rather than a > floating-point value. > > Your solution (a non-obvious printf format) is a bad one because while > it solves the problem of output, it doesn't solve the problem of > representation. As soon as you try to store an integer bigger than > 2^53 (approximately 9e15) you will lose significance: > [...] > In answer to your question, the behaviour of print is probably the > correct behaviour, since there's no point printing more precision than > you store. So it's a self bug. Many thanks for the reply. Following the initial surprise, my main concern was that attempts to unearth a description or explanation (i.e. documentation) for the observed behaviour was so tricky. For instance, there was nothing obvious in the relevant parts of "Programming Perl". So I'm happy to categorise it as "self bug", although I'd like to include an element of "documentation weakness" in there and I'd be happy to assist someone in trying to improve the latter. Anyway, your explanation was useful and gives us sufficient to decide how to address our local use of these numbers. (In our case, they are human-oriented accumulated byte-counts, for which we don't actually need that significance/precision.) Thanks. -- : David Lee : ECMWF (Data Handling System) : Shinfield Park : Reading RG2 9AX : Berkshire : : tel: +44-118-9499 362 : email: XXXX@XXXXX.COM
4.print flips to scientific notation when integer exceeds 15 decimal digits
Although I've used perl for many years, I've just been surprised (in the unpleasant sense) by a recent event. Given a variable, say "$int", which is a growing integer, I would expect "print $int" to print it as a simple integer; indeed it usually does so. But when its size takes it from 15 decimal digits to 16 decimal digits, that "print" flips the output into scientific notation: 999999999999997 999999999999998 999999999999999 1e+15 1e+15 Ouch. The surprise is especially nasty when this output data is then used as input data for another program that expects an integer. This is consistent across a variety of OSes (although all perl 5.8.8). I eventually managed to track down a way to achieve the desired result with a non-obvious "printf" format. (I leave that, and its clear user-oriented explanation, as an exercise for the reader!) I'm not aware of any documentation about this surprise. Is this a program bug or a documentation bug? (Or a self bug?) Is there a more appropriate forum than "beginners@..." to raise this? -- : David Lee : ECMWF (Data Handling System) : Shinfield Park : Reading RG2 9AX : Berkshire : : tel: +44-118-9499 362 : email: XXXX@XXXXX.COM
5.basic quesion reg file opening
why cant i specify like this to open a file open AG, " < ../new/new_name*"; Here i could open the file only if i mention the full file name if i give it as * i could not open the file ...is it possible to open the file with out mentioning the full file name coz in my progrm the file name new_name is only constant after that i append date to it so varies ? thanks for the help
6. Scientific Number problem again!
7. an Invitation to be Involved in a Survey on Developing Scientific Computing Software
Users browsing this forum: No registered users and 64 guest