Hi all, I use the following script to find out the methods available from a class of Bio::Seq.
#!c:/Perl/bin/Perl.exe use warnings; use strict; use Bio::Seq; use Data::Dumper; use Class::Inspector; my $methods=Class::Inspector->methods('Bio::Seq', 'full','public'); print Data::Dumper->Dump([$methods]), "\n\n"; exit; The problem is that the output is not in alphabetic order. So I remove this line print Data::Dumper->Dump([$methods]), "\n\n"; and defer the reference of array using these lines foreach (sort @$methods) { print "$_", "\n\n"; } Now it works. My quesion: is it possible to let the job done using OO style? Thanks, Li --- "Charles K. Clarkson" <[EMAIL PROTECTED]> wrote: > Jeff Pang wrote: > > : my @original=(...); > : my @sort=sort {$a cmp $b} @original; > : print Dumper @sort; > > You might like the results better using an array > reference. > > print Dumper [EMAIL PROTECTED]; > > > Or you could avoid the extra array with the > anonymous array > constructor (or is it an operator? [shrug]) > > print Dumper [ sort {$a cmp $b} @original ]; > > > HTH, > > Charles K. Clarkson > -- > Mobile Homes Specialist > Free Market Advocate > Web Programmer > > 254 968-8328 > > If it looks wrong convert it to plain text. > > > -- > To unsubscribe, e-mail: > [EMAIL PROTECTED] > For additional commands, e-mail: > [EMAIL PROTECTED] > <http://learn.perl.org/> > <http://learn.perl.org/first-response> > > > __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>