Hash from two arrays: Difference between revisions

Content added Content deleted
(Rename Perl 6 -> Raku, alphabetize, minor clean-up)
No edit summary
Line 1,400: Line 1,400:
2
2
3.141592654
3.141592654
</pre>

=={{header|Phixmonti}}==
<lang Phixmonti>include ..\Utilitys.pmt

def getd /# array key -- array data #/
swap 1 get
rot find nip
dup if
swap 2 get rot get nip
else
drop "Unfound"
endif
enddef

( ( 1 "two" PI ) ( "one" 2 PI ) ) /# keys / data #/

1 getd print nl
"two" getd print nl
PI getd tostr print nl
3 getd print</lang>
{{out}}
<pre>
one
2
3.141592653589793
Unfound
</pre>
</pre>