Summary
トラピストビールの中でも最高の一品!一度飲んだら,もうこのビールの虜!
Reference
ベルギービール JAPAN - トラピストビールhttp://www.belgianbeer.co.jp/search_cat/trappist.htm
<table>
<tr>
<td onClick="window.location.href='index.html'">ジャンプ</td>
<td onClick="window.location.href='index.html'">ジャンプ</td>
</tr>
</table>
ジャンプ | ジャンプ |
javascript:(
function(){
window.clipboardData.setData('text','クリップボードにコピーしたい文字列');
}
)();
% echo -n 'username:password' | base64 -e
% echo -n 'username:password' | openssl enc -e -base64
% echo -n 'username:password' | nkf -MB
% echo -n 'username:password' | perl -MMIME::Base64 -ne 'print encode_base64($_)'
% telnet hostname 80
GET /secret/index.html HTTP/1.0
Host: hostname:80
Authorization: Basic XXXXXXXXXXXX(BASE64エンコード)
<p src="map.png">
駅を出て左折後に<strong>メインストリート</strong>を直進して下さい。
</p>
<?php
$width = "400";
$height = "250";
$swf = "charts/charts.swf";
$xml = "xml/hoge.xml";
$lib = "charts/charts_library";
?>
<object
classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
codebase="
http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0
"
width="<?= $width ?>"
height="<?= $height ?>"
id="charts"
align=""
>
<param name=movie value="<?= $swf?>">
<param name=FlashVars VALUE="library_path=<?= $lib ?>&xml_source=<?= $xml ?>">
<param name=quality value="high">
<param name=bgcolor value="#999999">
<embed
src="<?= $swf ?>"
FlashVars="library_path=<?= $lib ?>&xml_source=<?= $xml ?>"
quality=high
bgcolor=#999999
width="<?= $width ?>"
height="<?= $height ?>"
name="charts"
align=""
type="application/x-shockwave-flash"
pluginspage="http://www.macromedia.com/go/getflashplayer"
>
</embed>
</object>
font='Sans Serif'
で日本語利用可能
no mechanism available: checkpass failed
- Reference
http://hk-tech.homeip.net/pcserver/imap4.html
# aptitude install libnet-dns-perl
#!/usr/bin/perl
use Net::DNS;
my $res = Net::DNS::Resolver->new;
while (<>){
chomp;
my $host = $_;
my $query = $res->search($host);
if ($query) {
foreach my $rr ($query->answer) {
next unless $rr->type eq "A";
my $address = $rr->address;
printf("%-20s : %14s\n" ,$host,$address);
}
} else {
warn "query failed: ", $res->errorstring, "\n";
}
}
$ cat list
www.example.com
www.exmaple.net
www.example.org
$ nslookuper.pl < list
www.example.com : 192.0.34.166
www.example.net : 192.0.34.166
www.example.org : 192.0.34.166
sub func($$@){
my($a,$b,@list)=@_;
}
&func($a,$b,@list);