# New Ticket Created by [EMAIL PROTECTED]
# Please include the string: [perl #53108]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=53108 >
Possible bug in expressions that mix integer and float values.
[EMAIL PROTECTED]:~$ perl6 -e 'say 1.1*1'
1.1
[EMAIL PROTECTED]:~$ perl6 -e 'say 1.1*10'
11
[EMAIL PROTECTED]:~$ perl6 -e 'say 10*1.2'
1.66058e+08
[EMAIL PROTECTED]:~$ perl6 -e 'say 20*1.1'
1.52219e+08
[EMAIL PROTECTED]:~$ for SEQ in 1 2 3 4 5; do perl6 -e "say 1*${SEQ}.2"; done
1.66058e+08
3.04439e+08
4.4282e+08
5.81201e+08
7.19583e+08
[EMAIL PROTECTED]:~$ uname -a
Linux KanotixBox 2.6.22-6-generic #1 SMP Sun Jun 3 18:08:36 CEST 2007 i686
GNU/Linux
[EMAIL PROTECTED]:~$ perl6 -v
This is Rakudo Perl 6, revision 27058 built on parrot 0.6.1-devel
for i486-linux-gnu-thread-multi.
Copyright 2006-2008, The Perl Foundation.
