晋太元中,武陵人捕鱼为业。缘溪行,忘路之远近。忽逢桃花林,夹岸数百步,中无杂树,芳草鲜美,落英缤纷。渔人甚异之,复前行,欲穷其林。 林尽水源,便得一山,山有小口,仿佛若有光。便舍船,从口入。初极狭,才通人。复行数十步,豁然开朗。土地平旷,屋舍俨然,有良田、美池、桑竹之属。阡陌交通,鸡犬相闻。其中往来种作,男女衣着,悉如外人。黄发垂髫,并怡然自乐。 见渔人,乃大惊,问所从来。具答之。便要还家,设酒杀鸡作食。村中闻有此人,咸来问讯。自云先世避秦时乱,率妻子邑人来此绝境,不复出焉,遂与外人间隔。问今是何世,乃不知有汉,无论魏晋。此人一一为具言所闻,皆叹惋。余人各复延至其家,皆出酒食。停数日,辞去。此中人语云:“不足为外人道也。”(间隔 一作:隔绝) 既出,得其船,便扶向路,处处志之。及郡下,诣太守,说如此。太守即遣人随其往,寻向所志,遂迷,不复得路。 南阳刘子骥,高尚士也,闻之,欣然规往。未果,寻病终。后遂无问津者。
|
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 : /usr/bin/ |
Upload File : |
#!/bin/sh
#
# Copyright (c) 2007 Dmitry Butskoy
# <buc@citadel.stu.neva.ru>
# License: GPL v2 or any later
#
# See COPYING for the status of this software.
#
#
# Shell wrapper providing tcptraceroute(8) command line interface.
#
# The original implementation of tcptraceroute(8) can be obtained
# from http://michael.toren.net/code/tcptraceroute/
#
opts="-T -O info"
length=""
prgname=$0
usage () {
echo "Usage: $prgname [-hvnFSAE] [-i dev] [-f furst_ttl] [-l length]
[-q nqueries] [-t tos] [-m max_ttl] [-p src_port] [-s src_addr]
[-w wait_time] host [dest_port] [length]" >&2
}
PARSED=`getopt -- 'hvdnNi:l:f:Fm:p:q:w:s:t:SAE' "$@"`
[ $? != 0 ] && exit 2
eval set -- "$PARSED"
while [ $# -gt 0 ]
do
case "$1" in
-[dnF]) opts="$opts $1"; shift ;;
-N) shift ;;
-[ifmqwst]) opts="$opts $1 $2"; shift 2 ;;
-l) length=$2; shift 2 ;;
-p) opts="$opts --sport=$2"; shift 2 ;;
-S) opts="$opts -O syn"; shift ;;
-A) opts="$opts -O ack"; shift ;;
-E) opts="$opts -O ecn"; shift ;;
-h) usage ; exit 0 ;;
-v) echo "\"tcptraceroute\"-compatible wrapper for new Linux Traceroute" >&2;
exit 0 ;;
--) shift; break ;;
*) echo "$prgname: Internal parsing error" >&2; exit 2 ;;
esac
done
[ $# -eq 0 ] && {
usage
exit 2
}
host=$1
shift
[ $# -gt 0 ] && {
opts="$opts -p $1"
shift
}
[ $# -gt 0 ] && {
length=$1
shift
}
# Say to the people it is actually another program...
echo "Running:
traceroute $opts $host $length" >&2
exec traceroute $opts $host $length