51CTO博客开发
小部件：框架-用来对其他小部件进行分组。#!/usr/bin/perl -w use Tk; use strict; my $mw = MainWindow->new; $mw->geometry("200x100"); $mw->title("Frame Test"); $mw->Frame(-back
本文参考IBM developerWorks Perl/Tk学习查看系统perl version:windows XP系统下：开始-运行-cmd-输入perl -version查看是否安装Perl/Tk模块命令行输入：perl -e "use Tk"若不存在，返回错误信息安装Perl/Tk模块，命令行键入：ppm install Tk安装完成后，可利用命令perl -e "use Tk"进行验证3
1.case语句控制流#！/bin/shecho "please input number 1 to 3"read numbercase $number in1) echo "you input 1" ;;2|3) echo "you input 2 or 3" ;;*) echo "error! t
########################################### # # # Date:2013/05/10 # # Author:Andy_Leung # # Function:FTP tra
Copyright © 2005-2025 51CTO.COM 版权所有 京ICP证060544号
