Why not use a foreach, test the element, then undef it when found? Or, use foreach, test the element, if != '0', then push it onto another array?
David Gilden <[EMAIL PROTECTED]> had this to say, > Hi, > I would like to remove elements from an array that are eq to string '0' > The following does not work, can someone shed some light on the proper > way to do this. > Thanks! > Dave G. > > #!/usr/bin/perl -w > > @bag_quantity = ( '0', 1, '0', '0', '0', '0', '0', '0', '0' ); > > > for (@bag_quantity){ > shift if $_ eq '0'; > } > > > print "@bag_quantity\n"; > > > ============================================== > Cora Connection: Your West African Music Source > Resources, Recordings, Instruments & More! > <http://www.coraconnection.com/> > ============================================== > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- There are 010 types of people in the world: those who understand binary, and those who don't. τΏτ 111,111,111 x 111,111,111 = 12,345,678,987,654,321 (decimal) ~ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]