| Choom | really? that would be even better |
| friedo | I think Class::Std does it (but it also does that retardted inside-out object crap too) |
| Choom | checking |
| stuuf | could you use Exporter to do that? |
| fooma | my fooa = ("foo", "foo2", "foo3"); while(<$fooa>) { print; } any reason that doesn't print? |
| stuuf | you'd have to kind of turn it around into 'Importer' |
| friedo | fooma, because it's not valid Perl |
| fooma | *my $fooa sorry |
| stuuf | assigning a list to a scalar? |
| friedo | you can't assign a list to a scalar |
| fooma | i'm just trying to get an array to print once through while... pretty damn easy to do it in ruby or bash |
| stuuf | my @fooa = (..); for (@fooa) ... |
| Botje_ | forsaken: print foreach $fooa *fooma |
| friedo | fooma, I think you want for(@fooa) { print } or print for @fooa; |
| action | limetang is now away. Reason: Sleeping. Current time: 22:54:57 |
| limetang | is now away. Reason: Sleeping. Current time: 22:54:57 |
| stuuf | or maybe just print @fooa |
| Botje_ | limetang: great. turn that off please. |
| fooma | next if = /foo2/; can you do that in foreach? |
| Botje_ | forsaken: sorry, that's not valid perl. you can do next if /foo2/; though. |
| nanonyme | Ani-_: meh, i read the rest of the thread. almost makes me want to cry >_< or beat someone with a mallet |
| stuuf | eval: @fooa=qw/foo1 foo2 foo3/; for (@fooa) {/foo2/ && next; print} |
| buubot | stuuf: foo1 foo3 |
| fooma | nice=) sorry for being such a newb |
| friedo | eww, don't use short-circuits for conditionals && is exactly the same length as if! and "if" doesn't require the shift key :) |
| Choom | I see the idea behind Class::Std as well as the benefits but I don't like the implementation since it tinkers with my namespaces |
| fuse | print unless /foo2/ looks clearer |
| stuuf | yeah i'd do that |