Re: Getting and saving IPMI Infos

What's wrong with

foreach (@saved) {
    s/|/=/;
    push @sort, $_;
}
...
[download]

Comment on Re: Getting and saving IPMI Infos Download Code

Replies are listed 'Best First'.
Re^2: Getting and saving IPMI Infos by chargrill (Parson) on Mar 22, 2006 at 19:46 UTC
Or... `@sort = map { s/ \|/=/ } @saved;` [download] --chargrill `$,=42;for(34,0,-3,9,-11,11,-17,7,-5){$.=pack'c'=>$,+=$_}for(reverse s +plit//=>$ ){$%++?$ %%2?push@C,$_,$":push@c,$_,$":(push@C,$_,$")&&push@c,$"}$C[$# +C]=$/;($#C >$#c)?($ c=\@C)&&($ C=\@c):($ c=\@c)&&($C=\@C);$%=$\|;for(@$c){print$_^ +$$C[$%++]}` [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^2: Getting and saving IPMI Infos
by chargrill (Parson) on Mar 22, 2006 at 19:46 UTC

Or...

@sort = map { s/ |/=/ } @saved;
[download]

--chargrill

$,=42;for(34,0,-3,9,-11,11,-17,7,-5){$*.=pack'c'=>$,+=$_}for(reverse s
+plit//=>$*
){$%++?$ %%2?push@C,$_,$":push@c,$_,$":(push@C,$_,$")&&push@c,$"}$C[$#
+C]=$/;($#C
>$#c)?($ c=\@C)&&($ C=\@c):($ c=\@c)&&($C=\@C);$%=$|;for(@$c){print$_^
+$$C[$%++]}
[download]

[reply]
[d/l]
[select]