[Tokyo.pm] Re: Perl Conference 4.0でのいろいろ

OKABE, Keiichi okabek @ beige.ocn.ne.jp
2000年 8月 9日 (水) 09:12:27 CDT


岡部です

----- Original Message ----- 
From: "Yasunari Momoi" <momo @ iij.ad.jp>
To: <tokyo-pm-list @ happyfunball.pm.org>
Sent: Saturday, July 22, 2000 7:19 AM
Subject: Re: [Tokyo.pm] Perl Conference 4.0でのいろいろ


> あと,プログラムには載ってなかったんですが,最終日に突然,量
> 子力学の歴史から話しはじめて,『量子力学の演算を Perl に取り
> 入れると,いろいろな処理がこんなに簡潔に書ける』という,とて
> もコミカルな発表をしてました.

今日
comp.lang.perl.announce
を見ていたらこれに関するモジュールの話がでていました。

> ==============================================================================
>               Release of version 1.00 of Quantum::Superpositions
> ==============================================================================
> 
> 
> NAME
>     Quantum::Superpositions - QM-like superpositions for Perl
> 
> DESCRIPTION
> 
>     The Quantum::Superpositions module provides a new scalar data
>     structure: the superposition. In a metaphor drawn from quantum
>     mechanics, superpositions store a collection of values by overlaying
>     them in parallel superimposed states within a single scalar
>     variable. Which allows for cool stuff like:
> 
>         use Quantum::Superpositions;
> 
>         if ($x eq any($a, $b, $c) { ...  }
> 
>         while ($nextval < all(@thresholds) { ... }
> 
>         $max = any(@value) < all(@values);
> 
> AUTHOR
>     Damian Conway (damian @ conway.org)

> Quantum::Superpositions has been uploaded to the CPAN
> and is also available from:
> 
> http://www.csse.monash.edu.au/~damian/CPAN/Quantum-Superpositions.tar.gz
> 

だそうです。まだ落としてません。

話はPerlからずれますがこんなのも見つけました。
http://www.reactos.com/kernel/latest.html
ReactOS is an Open Source effort to develop a quality operating
 system that is compatible with Windows NT applications and drivers

これの上でPerl動かしたいなぁとか思ってます。 (^^)


#  う〜ん、なんでocnではfj.comp.lang.perlが流れないんだろう
---
use Tk;$c=tkinit->Canvas(-height=>50,-width=>100)->pack;$a="15115155,223342,
2343,3335,24254544,6163,5292918185,53939484,7273,6465757464";$a=~s/\s//g;
map{s/(\d)/sprintf("%s,",$1*10)/eg;$c->createLine(split /,/,$_)}(split /,/,$a);
MainLoop; #okabek @ beige.ocn.ne.jp






Tokyo-pm メーリングリストの案内