http://qs321.pair.com?node_id=1197402


in reply to Re: Need help with removing values from arrays
in thread Need help with removing values from arrays

Hi, i have updated the information given, i hope it is enough but if you need anything more i can keep trying to add as much as i can.

  • Comment on Re^2: Need help with removing values from arrays

Replies are listed 'Best First'.
Re^3: Need help with removing values from arrays
by marinersk (Priest) on Aug 15, 2017 at 11:16 UTC

    Okay, I had a few minutes, so I added all the mystatements and provided some initializers to get around the error messages.

    Your code still doesn't do anything:

    #!/usr/bin/perl use strict; use warnings; my $str = "1,2,3,4,5"; my @array = (); my ($ids, $attri) = split /,/, $str; print " \$ids: [$ids]\n"; print " \$attri: [$attri]\n"; splice (@array,$ids, 1); print " \@array:\n"; my $array_index = 0; foreach my $array_element (@array) { print " [$array_index]: [$array_element]\n"; } print "Okay, now what?\n"; sub refreshdisplay{ my $id=0; my $arraylist = ""; for($id=0;$id<=$#array;$id++){ if($id == 0){ $arraylist = "$array[0]"; } else{ $arraylist .= "$id,$array[$id]\n"; } } }

    Yields:

    S:\Steve\Dev\PerlMonks\P-2017-08-15@0704-combobox>perl combobox0b.pl $ids: [1] $attri: [2] splice() offset past end of array at combobox0b.pl line 12. @array: Okay, now what? S:\Steve\Dev\PerlMonks\P-2017-08-15@0704-combobox>

      > Okay, I had a few minutes, so I added all the my statements
      Not true, this post is one minute older than the last pointless one you made. adding all 4 mys must have really messed with your mind. What a saint, thanks for your amazing efforts so far.

        Helping someone to see not only what needs to change in how they ask questions, but also why it is necessary, requires a subtlety which apparently eludes you.

Re^3: Need help with removing values from arrays
by marinersk (Priest) on Aug 15, 2017 at 11:15 UTC

    You have not given us a complete working example:

    S:\Steve\Dev\PerlMonks\P-2017-08-15@0704-combobox>perl combobox0a.pl Global symbol "$str" requires explicit package name at combobox0a.pl l +ine 5. Global symbol "@array" requires explicit package name at combobox0a.pl + line 6. Global symbol "$id" requires explicit package name at combobox0a.pl li +ne 9. Global symbol "$arraylist" requires explicit package name at combobox0 +a.pl line 10. Global symbol "$id" requires explicit package name at combobox0a.pl li +ne 11. Global symbol "$id" requires explicit package name at combobox0a.pl li +ne 11. Global symbol "@array" requires explicit package name at combobox0a.pl + line 11. Global symbol "$id" requires explicit package name at combobox0a.pl li +ne 11. Global symbol "$id" requires explicit package name at combobox0a.pl li +ne 12. Global symbol "$arraylist" requires explicit package name at combobox0 +a.pl line 13. Global symbol "@array" requires explicit package name at combobox0a.pl + line 13. Global symbol "$arraylist" requires explicit package name at combobox0 +a.pl line 16. Global symbol "$id" requires explicit package name at combobox0a.pl li +ne 16. Global symbol "@array" requires explicit package name at combobox0a.pl + line 16. Global symbol "$id" requires explicit package name at combobox0a.pl li +ne 16. Execution of combobox0a.pl aborted due to compilation errors. S:\Steve\Dev\PerlMonks\P-2017-08-15@0704-combobox>