pwmnliknonet via rt veyjhbyfbuaeanjperlorg new ticket created pwmnliknonet please include string perl 46429 subject line future correspondence issue bug report perl pwmnliknonet generated help perlbug 136 running perl 5100 please enter report following code use smartmatch use feature 510 given _ 1 1 say yes smartmatch used boolean result used parameter _ produced following patch fixes case breaks another becomes choice new test old failing case im reporting need jot bugs today forget ok 54 1 ok foo smartmatched failed test 1 ok foo smartmatched opswitcht line 519 bleadperlopc 20071012 082357000000000 0700 mybleadopc 20071014 095334000000000 0700 49376 493711 looks_like_boolclogopoop_first looks_like_boolclogopoop_firstop_sibling case op_null return oop_flags opf_kids looks_like_boolcunopoop_first case op_entersub case op_not case op_xor bleadperltopswitcht 20060613 122933000000000 0700 myblead2topswitcht 20071014 103724000000000 0700 4576 45716 things smart matched ok 0 given12 1 1 1 12 ok 1 okok bool smartmatches ok 0 given0 wheneofdata ok 1 please change anything line flags categorycore severityhigh site configuration information perl 5100 configured josh sun oct 14 095517 pdt 2007 summary perl5 revision 5 version 10 subversion 0 patch 32107 configuration platform osnamelinux osvers262016generic archnamei686linux unamelinux lik 262016generic 2 smp sun sep 23 195039 utc 2007 i686 gnulinux config_argsdebuggingboth dprefixoptperl5100dbg des hintrecommended useposixtrue d_sigactiondefine useithreadsundef usemultiplicityundef useperliodefine d_sfioundef uselargefilesdefine usesocksundef use64bitintundef use64bitallundef uselongdoubleundef usemymallocn bincompat5005undef compiler cccc ccflags ddebugging fnostrictaliasing pipe iusrlocalinclude d_largefile_source d_file_offset_bits64 optimizeo2 g cppflagsddebugging fnostrictaliasing pipe iusrlocalinclude ccversion gccversion412 ubuntu 4120ubuntu4 gccosandvers intsize4 longsize4 ptrsize4 doublesize8 byteorder1234 d_longlongdefine longlongsize8 d_longdbldefine longdblsize12 ivtypelong ivsize4 nvtypedouble nvsize8 off_toff_t lseeksize8 alignbytes4 prototypedefine linker libraries ldcc ldflags lusrlocallib libpthusrlocallib lib usrlib usrlib64 libslnsl ldb ldl lm lcrypt lutil lc perllibslnsl ldl lm lcrypt lutil lc libcliblibc25so soso useshrplibfalse libperllibperla gnulibc_version25 dynamic linking dlsrcdl_dlopenxs dlextso d_dlsymunundef ccdlflagswle cccdlflagsfpic lddlflagsshared o2 g lusrlocallib locally applied patches devel inc perl 5100 optperl5100dbglib5100i686linux optperl5100dbglib5100 optperl5100dbglibsite_perl5100i686linux optperl5100dbglibsite_perl5100 environment perl 5100 homehomejosh langen_usutf8 language unset ld_library_path unset logdir unset pathhomejoshbinperl588binhomejoshbinhomejoshbinbinhomejoshbinperl588binhomejoshbinhomejoshbinbinusrlocalsbinusrlocalbinusrsbinusrbinsbinbinusrgames perl_badlang unset shellbinbash tue 05 aug 2008 160814 0700 perl 46429 given applies smartmatch booleans