nicht angemeldet
Liste erweitern + neues Element am Anfang
Hi,
Ich habe eine kleine Frage:
Ich will eine Liste um ein Element erweitern. Das Element soll aber nicht am Ende der Liste eingefügt werden (wie bei push), sondern am Anfang der Liste.
Gibt es ein anderen Weg, um das zu machen ohne so etwas zu brauchen:
@liste=reverse(@liste);
push(@liste,$element_neu);
@liste=reverse(@liste);
Gruss Frédéric
-
use Mosche;
Ich will eine Liste um ein Element erweitern. Das Element soll aber nicht am Ende der Liste eingefügt werden (wie bei push), sondern am Anfang der Liste.
Gibt es ein anderen Weg, um das zu machen ohne so etwas zu brauchen:@liste=reverse(@liste);
push(@liste,$element_neu);
@liste=reverse(@liste);ist das selbe wie unshift:
unshift(@liste, $neues_element);
perldoc -f unshift
use Tschoe qw(Matti);
--
$a=n(1001010);print chr($a+=$_)for(0,43,-2,1,-84,65,13,1,5,
-12,-3,13,-82,48,21,13,-6,-76,72,-7,2,8,-6,13,-104);sub n{
$b=0;$_=0;for($c=length$_[0];$c;--$c){$_+=_($b)if substr$_
[0],$c-1,1;$b++;}$_}sub _{($d)=@_;for($e=1;$d--;$e*=2){}$e}