クリッカブルマップのCGI
このCGI（map.cgi）は、クリックされた位置（120,80など）を受け取り、横と縦の場所に分割し、
どこの場所かによって表示ページを変えるプログラムになる。

#!/usr/local/bin/perl ($x,$y)=split(/,/,$ARGV[0]); if ($x <100) { print "Location: a.html\n\n";} else {print "Location: b.html\n\n";}

1行目はPerlで書かれていることの宣言。

3行目の$ARGV[0]は値を受け取る変数で、「120,80」というような値を受け取る。
これをsplit文を使って「,」によって分割して、
結果を$x(横の位置、120）、$y（縦の位置、80）に代入している。

4，5行目では$x、つまり横の位置が100より大きいか小さいかによって、
Location文で表示ページを変更している。