晋太元中,武陵人捕鱼为业。缘溪行,忘路之远近。忽逢桃花林,夹岸数百步,中无杂树,芳草鲜美,落英缤纷。渔人甚异之,复前行,欲穷其林。 林尽水源,便得一山,山有小口,仿佛若有光。便舍船,从口入。初极狭,才通人。复行数十步,豁然开朗。土地平旷,屋舍俨然,有良田、美池、桑竹之属。阡陌交通,鸡犬相闻。其中往来种作,男女衣着,悉如外人。黄发垂髫,并怡然自乐。 见渔人,乃大惊,问所从来。具答之。便要还家,设酒杀鸡作食。村中闻有此人,咸来问讯。自云先世避秦时乱,率妻子邑人来此绝境,不复出焉,遂与外人间隔。问今是何世,乃不知有汉,无论魏晋。此人一一为具言所闻,皆叹惋。余人各复延至其家,皆出酒食。停数日,辞去。此中人语云:“不足为外人道也。”(间隔 一作:隔绝) 既出,得其船,便扶向路,处处志之。及郡下,诣太守,说如此。太守即遣人随其往,寻向所志,遂迷,不复得路。 南阳刘子骥,高尚士也,闻之,欣然规往。未果,寻病终。后遂无问津者。
|
Server : Apache System : Linux srv.rainic.com 4.18.0-553.47.1.el8_10.x86_64 #1 SMP Wed Apr 2 05:45:37 EDT 2025 x86_64 User : rainic ( 1014) PHP Version : 7.4.33 Disable Function : exec,passthru,shell_exec,system Directory : /lib64/perl5/bits/ |
Upload File : |
require '_h2ph_pre.ph';
no warnings qw(redefine misc);
unless(defined(&_BITS_SIGACTION_H)) {
eval 'sub _BITS_SIGACTION_H () {1;}' unless defined(&_BITS_SIGACTION_H);
unless(defined(&_SIGNAL_H)) {
die("Never include <bits/sigaction.h> directly; use <signal.h> instead.");
}
if(defined (&__USE_POSIX199309) || defined (&__USE_XOPEN_EXTENDED)) {
eval 'sub sa_handler () { ($__sigaction_handler->{sa_handler});}' unless defined(&sa_handler);
eval 'sub sa_sigaction () { ($__sigaction_handler->{sa_sigaction});}' unless defined(&sa_sigaction);
} else {
}
eval 'sub SA_NOCLDSTOP () {1;}' unless defined(&SA_NOCLDSTOP);
eval 'sub SA_NOCLDWAIT () {2;}' unless defined(&SA_NOCLDWAIT);
eval 'sub SA_SIGINFO () {4;}' unless defined(&SA_SIGINFO);
if(defined (&__USE_XOPEN_EXTENDED) || defined (&__USE_MISC)) {
eval 'sub SA_ONSTACK () {0x8000000;}' unless defined(&SA_ONSTACK);
}
if(defined (&__USE_XOPEN_EXTENDED) || defined (&__USE_XOPEN2K8)) {
eval 'sub SA_RESTART () {0x10000000;}' unless defined(&SA_RESTART);
eval 'sub SA_NODEFER () {0x40000000;}' unless defined(&SA_NODEFER);
eval 'sub SA_RESETHAND () {0x80000000;}' unless defined(&SA_RESETHAND);
}
if(defined(&__USE_MISC)) {
eval 'sub SA_INTERRUPT () {0x20000000;}' unless defined(&SA_INTERRUPT);
eval 'sub SA_NOMASK () { &SA_NODEFER;}' unless defined(&SA_NOMASK);
eval 'sub SA_ONESHOT () { &SA_RESETHAND;}' unless defined(&SA_ONESHOT);
eval 'sub SA_STACK () { &SA_ONSTACK;}' unless defined(&SA_STACK);
}
eval 'sub SIG_BLOCK () {0;}' unless defined(&SIG_BLOCK);
eval 'sub SIG_UNBLOCK () {1;}' unless defined(&SIG_UNBLOCK);
eval 'sub SIG_SETMASK () {2;}' unless defined(&SIG_SETMASK);
}
1;