qydlqcwsiacfymissuesapacheorg httpsissuesapacheorgspamassassinshow_bugcgiid5763 wrzzpvsidneycom changed removed added status whiteboardneeds 2 votes 32 needs 1 vote 32 additional comments wrzzpvsidneycom 20080228 1130 1 receiving mail assignee bug watching assignee wwsddjtelusnet sat apr 26 155232 2008 messageid 47b293896090401telusnet date tue 12 feb 2008 225153 0800 john w krahn mimeversion 10 perl beginners subject tk disabling menu entries contenttype textplain charsetiso88591 formatflowed contenttransferencoding 7bit mk wrote amazingly worked end simply adding state disabled actual menucommand hence avoiding documented entryconfigure method cget altogether anyone patience left could explain state count 1 normal disabled specifically 1 x segment state normal value count odd number state disabled value count even number test increment value count 1 tests least significant bit count efficient modulo test 2 another way test even odd numbers john perl isnt toolbox small machine shop specialorder certain sorts tools low cost short order larry wall dhijpgbdpcgmhlhololc contenttype messagerfc822 contentdisposition inline filenamebeginners_98757ezm subsqsshighstreamnet sat apr 26 155232 2008 soiofdvxgperlorg zentara subject tk disabling menu entries date wed 13 feb 2008 092524 0500 messageid mimeversion 10 contenttype textplain charsetusascii contenttransferencoding 7bit tue 12 feb 2008 220321 0500 kejhtdbhqaekyintergatecom mk wrote amazingly worked end simply adding state disabled actual menucommand hence avoiding documented entryconfigure method cget altogether anyone patience left could explain state count 1 normal disabled specifically 1 x segment see john krahn gave answer help understand toggle switch state probably could simplified example handy posted called ternary operator know pretty complex throw beginner hate scroll perldoc perlop conditional operator ternary conditional operator c works much like ifthenelse instead long ifthenelse testing state menu currently flipping ternary switch makes toggle short piece code could straight forward ifthenelse like sloppy untested pseudocode ifcount 1count 0 newstate disabled elsifcount 0 count 1 newstate normal menucgetmenuentryconfigure2 state newstate state newstate could use count toggle every button press cause toggle flip working code may see usefulness entryconfigure cget complex menu needed dynamically grey items like usrbinperl use warnings use strict use tk toggle 0 toggle1 0 toggle2 0 mw tkinit menubar mwmenutype menubar mwconfiguremenu menubar menu menubarcascadelabel file menucommandlabel new menucommandlabel open menu1 menubarcascadelabel test menu1commandlabel yee menu1commandlabel haw mwbutton text push look file menu command sub state toggle 1 normal disabled menucgetmenuentryconfigure2 state state pack mwbutton text push look test menu command sub state toggle1 1 normal disabled menu1cgetmenuentryconfigure1 state state pack mwbutton text push look main test menu command sub state toggle2 1 normal disabled menu1configure state state pack mainloop __end__ menus notoriously obtuse pays go groupsgooglecom search examples still havnt figured grey arbitrary item deeply cascaded menu zentara im really human play one earth httpzentaranetjaphhtml dhijpgbdpcgmhlhololc contenttype messagerfc822 contentdisposition inline filenamebeginners_98750ezm dzuhannewsguycom sat apr 26 155232 2008 soiofdvxgperlorg dzuhannewsguycom subject simple loop speed faster 1 second date tue 12 feb 2008 223735 0600 messageid 87ir0tmpyofsfnewsguycom mimeversion 10 contenttype textplain charsetusascii hope isnt horribly difficult task perl loop sped faster 1 second intervals recall something various modules allow time keep finer granularity things like unlink whatever made run faster one second intervals dhijpgbdpcgmhlhololc contenttype messagerfc822 contentdisposition inline filenamebeginners_98751ezm zuroequserssourceforgenet sat apr 26 155232 2008 messageid date tue 12 feb 2008 235432 0500 yitzle dzuhannewsguycom subject simple loop speed faster 1 second cc soiofdvxgperlorg mimeversion 10 contenttype textplain charsetiso88591 contenttransferencoding 7bit trying time perl e print _n 1100 takes 5 milliseconds ultrafast pc 100 loops 5 milliseconds second per loop slow want dhijpgbdpcgmhlhololc contenttype messagerfc822 contentdisposition inline filenamebeginners_98752ezm ahlgrwhsvgmailcom sat apr 26 155232 2008 messageid 58ce48dc0802122116h731c678dn7dae8ee169a295b9mailgmailcom date wed 13 feb 2008 001609 0500 chas owens dzuhannewsguycom subject simple loop speed faster 1 second cc soiofdvxgperlorg mimeversion 10 contenttype textplain charsetiso88591 contenttransferencoding 7bit feb 12 2008 1137 pm wrote hope isnt horribly difficult task perl loop sped faster 1 second intervals recall something various modules allow time keep finer granularity things like unlink whatever made run faster one second intervals snip may want look select function timehires call select four arguments get timeout smaller second 1 print localtime n select undef undef undef 14 sleep quarter second also use usleep function timehires 1 print localtime n usleep 1_000_0004 sleep quarter second even nanosleep function timehires 1 print localtime n nanosleep 1e94 sleep quarter second httpperldocperlorgfunctionsselecthtml httpperldocperlorgtimehireshtml dhijpgbdpcgmhlhololc contenttype messagerfc822 contentdisposition inline filenamebeginners_98754ezm klqexhtgooglemailcom sat apr 26 155232 2008 messageid 9c7446e70802130256v534dcacbsdcd7f726c752e581mailgmailcom date wed 13 feb 2008 105624 0000 dermot beginners subject one liner mimeversion 10 contenttype multipartalternative boundary_part_16048_325222601202900184443 _part_16048_325222601202900184443 contenttype textplain charsetiso88591 contenttransferencoding 7bit contentdisposition inline hi ls perl ne print sed smv 1jpg sh concocted command change files named a1234 a1234jpg pure perl oneliner curious thanx dp _part_16048_325222601202900184443 dhijpgbdpcgmhlhololc contenttype messagerfc822 contentdisposition inline filenamebeginners_98755ezm vtxzoedvkwqgmailcom sat apr 26 155232 2008 messageid 47b2d42280302gmailcom date wed 13 feb 2008 122730 0100 robert leibl mimeversion 10 dermot cc soiofdvxgperlorg subject one liner contenttype textplain charsetiso88591 contenttransferencoding 7bit dermot wrote hi ls perl ne print sed smv 1jpg sh concocted command change files named a1234 a1234jpg pure perl oneliner curious thanx dp perl e rename _ _jpg foreach glob regards robert dhijpgbdpcgmhlhololc contenttype messagerfc822 contentdisposition inline filenamebeginners_98756ezm wwsddjtelusnet sat apr 26 155232 2008 messageid 47b2fd737020105telusnet date wed 13 feb 2008 062347 0800 john w krahn mimeversion 10 perl beginners subject one liner contenttype textplain charsetiso88591 formatflowed contenttransferencoding 7bit dermot wrote hi hello ls perl ne print sed smv 1jpg sh concocted command change files named a1234 a1234jpg pure perl oneliner curious perl erename__jpgor warn_ john perl isnt toolbox small machine shop specialorder certain sorts tools low cost short order larry wall dhijpgbdpcgmhlhololc contenttype messagerfc822 contentdisposition inline filenamebeginners_98767ezm lcvbdkstonehengecom sat apr 26 155232 2008 soiofdvxgperlorg subject one liner lcvbdkstonehengecom randal l schwartz date wed 13 feb 2008 105531 0800 messageid 86bq6k1yakfsfbluestonehengecom mimeversion 10 contenttype textplain charsetusascii robert robert leibl writes robert dermot wrote hi ls perl ne print sed smv 1jpg sh concocted command change files named a1234 a1234jpg pure perl oneliner curious thanx dp robert perl e rename _ _jpg foreach glob extra parens also write foreach whether loop like isnt foreach loop like perl e rename _ _jpg glob randal l schwartz stonehenge consulting services inc 1 503 777 0095 perlunixsecurity consulting technical writing comedy etc etc see perltrainingstonehengecom onsite openenrollment perl training dhijpgbdpcgmhlhololc contenttype messagerfc822 contentdisposition inline filenamebeginners_98759ezm jswrrldxysmmibwcstateohus sat apr 26 155232 2008 mimeversion 10 contenttype multipartalternative boundary__nextpart_001_01c86e5e5df413ee subject newbie file question date wed 13 feb 2008 113456 0500 messageid 200802131634m1dgyu8j027153jupiterbbwcstateohus __nextpart_001_01c86e5e5df413ee contenttype textplain charsetusascii contenttransferencoding quotedprintable ive going listings found code like following 20 directoryfiletxt directoryfiletxt 20 ive never seen things beginning path ive tried google luck ive googled file specification directory specification got lot hits stuff nothing symbols mean thought id ask hereso wouldnt mind explaining newbie id appreciate much thank 20 portions message may confidential exemption ohios public records law legal privilege received message error due unauthorized transmission interception please delete copies system without disclosing copying r transmitting message __nextpart_001_01c86e5e5df413ee dhijpgbdpcgmhlhololc contenttype messagerfc822 contentdisposition inline filenamebeginners_98760ezm thu 07 aug 2008 214129 0800 bug 5763 review problem invisible context extraction whitespace chars dropped