设为首页收藏本站
切换到宽版

 找回密码
 注册
搜索
批处理之家»论坛 › 其他脚本区 › Perl › [已解决] 请问，perl5321164的Tk空白页面程序，如何运行 ...
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发新帖
查看: 2560|回复: 4

[问题求助] [已解决] 请问，perl5321164的Tk空白页面程序，如何运行起来？

[复制链接]
zzz19760225
发表于 2025-8-31 12:13:04 | 显示全部楼层 |阅读模式
本帖最后由 zzz19760225 于 2025-9-4 12:16 编辑

WIN764，Strawberry perl5321164，D盘的解压文件夹改为perl53211文件夹
通义提供的语句，文件字符集U-8

  2. use Tk;
  3. my $mw = MainWindow->new;
  4. $mw->Label(-text => "Hello, World!")->pack;  
  5. MainLoop;
  6. <STDIN>;
复制代码
想显示一个空白页面，但是没有显示出来。
命令行执行出错

  2. Can't locate Tk.pm in @INC (you may need to install the Tk module) (@INC contains: E:/bat/perl/perl/site/lib E:/bat/perl/perl/lib .) at D:\perl53211\2..pl line1.
  3. BEGIN failed--compilation aborted at D:\perl53211\2..pl line 1.
复制代码
（好像说是安装错了，与前面安装的几个冲突了。）

  2. D:\perl53211>cpanm Tk
  3. --> Working on Tk
  4. Fetching http://www.cpan.org/authors/id/S/SR/SREZIC/Tk-804.036.tar.gz ... ERROR:
  5. read timeout at D:/perl53211/perl/vendor/lib/Net/HTTP/Methods.pm line 243. at D
  6. :/perl53211/perl/vendor/lib/LWP/UserAgent.pm line 1008.
  7. FAIL
  8. ! Download http://www.cpan.org/authors/id/S/SR/SREZIC/Tk-804.036.tar.gz failed.
  9. Retrying ...
  10. ERROR: read timeout at D:/perl53211/perl/vendor/lib/Net/HTTP/Methods.pm line 243
  11. . at D:/perl53211/perl/vendor/lib/LWP/UserAgent.pm line 1008.
  12. ! Download http://www.cpan.org/authors/id/S/SR/SREZIC/Tk-804.036.tar.gz failed.
  13. Retrying ...
  14. Configuring Tk-804.036 ... OK
  15. Building and testing Tk-804.036 ... OK
  16. Successfully installed Tk-804.036
  17. 1 distribution installed

  19. D:\perl53211>perl -MTk -e "print $Tk::VERSION, "\n";"
  20. 804.036

复制代码

  2. D:\perl53211>perl -MTk -e "print "如果看到这行，说明 Tk 已安装\n""
  3. 如果看到这行，说明 Tk 已安装
  4. D:\perl53211>perl -V:cc
  5. cc='gcc';
复制代码
按照说的去，也显示可以的啊。

  2. D:\perl53211>perl -MTk -e "my $mw = tkinit; $mw->Label(-text => 'Hello')->pack;
  3. $mw->Button(-text => 'Exit', -command => sub{exit})->pack; MainLoop;"
复制代码
直接命令行，可以跳出一个窗口了！
求助大佬！是不是语句有问题啊
把文件pl默认绑定perl.exe换成perl5.32.1.exe就可以了。
（523066680：[Perl][分形艺术]Julia集的绘制、缩放。“依赖的库：OpenGL  没安装的可以再activeperl的环境下执行：ppm install OpenGL”。）
（ActivePerl自带Tk桌面图形模式）
回复

举报

523066680
发表于 2025-9-5 22:58:30 | 显示全部楼层
perl的tk用不惯，后来用 IUP ，用起来挺好，就是编译有点繁琐。

[知乎]Perl GUI 模块选择 - 从选择到放弃

评分

参与人数 1技术 +1 收起 理由
zzz19760225 + 1 谢谢。好像网络不成功，正琢磨百度盘的文件 ...

查看全部评分

回复

举报

zzz19760225
 楼主| 发表于 2025-9-6 08:28:39 | 显示全部楼层
本帖最后由 zzz19760225 于 2025-9-6 08:59 编辑

通义AI询问Lua for Windows下载，给出的lua5.1的综合实验版本什么的

  2. GitHub 归档页面：
  3. 地址：https://github.com/rjpcomputing/luaforwindows
  4. 点击 "Releases" 标签页，下载最新的 .exe 安装程序（如 LuaForWindows_v5.1-58.exe）。
复制代码
再找LuaForWindows_v5.1-58.exe下载地址。

  2. 在 Releases 页面，建议下载最新的稳定版本，例如：

  4. LuaForWindows_v5.1-58.exe
  5. 这个版本包含了：

  7. Lua 5.1 解释器
  8. SciTE 编辑器
  9. LuaRocks
  10. IUP（用于 GUI）
  11. LuaSocket、LuaFileSystem 等常用库
  12. 下载与安装步骤
  13. 打开链接：[url]https://github.com/rjpcomputing/luaforwindows/releases[/url]
  14. 向下滚动，找到以 .exe 结尾的文件
复制代码
就给了个地址，然后浏览器和迅雷双下载，都下载完成。
（编译文件对外行来说，太痛苦了！关键是痛苦也不会，这个综合的会减少很多问题吧）

  2. -- 加载 IUP 库
  3. require("iuplua")

  5. -- 创建一个空白的 "填充" 元素，使 frame 内部看起来是空的
  6. -- 你也可以使用 iup.label{} 或 iup.vbox{} 等
  7. local filler = iup.fill{}  -- 这是一个空白的可伸缩填充元素

  9. -- 创建一个 frame，包含上面的空白元素
  10. local frm = iup.frame{
  11.   filler;
  12.   title = "我的空白 Frame";        -- frame 的标题（边框上的文字）
  13.   -- 可选：设置边框内边距
  14.   margin = "10x10"
  15. }

  17. -- 创建对话框（窗口），包含这个 frame
  18. local dlg = iup.dialog{
  19.   frm;
  20.   title = "Lua + IUP - 空白 Frame 示例";  -- 窗口标题
  21.   size = "300x200";                        -- 窗口大小（宽度x高度）
  22.   -- 可选：让窗口居中显示
  23.   position = "CENTER"
  24. }

  26. -- 显示窗口
  27. dlg:show()

  29. -- 启动 IUP 主循环（程序在此等待用户操作）
  30. iup.MainLoop()

复制代码
可以显示一个空白frame页面。
carbide-1.0.0-win64.zip打包（找不到下载）
（谢谢大佬的分享）
回复

举报

523066680
发表于 2025-9-6 10:33:44 | 显示全部楼层
回复 3# zzz19760225


    试试这个  
链接：https://pan.baidu.com/s/1Bvm8sJEycvQJ13-dapL9OA
提取码：2rxw

解压后 运行 portableshell.bat  会配置好当前运行终端的perl环境变量
然后试一下执行 `perl iup_threads.pl`  看能不能正常运行

评分

参与人数 1技术 +1 收起 理由
zzz19760225 + 1 非常感谢！

查看全部评分

回复

举报

zzz19760225
 楼主| 发表于 2025-9-6 13:23:35 | 显示全部楼层
回复  zzz19760225


    试试这个  
链接：
提取码：2rxw

解压后 运行 portableshell.bat  会配 ...
523066680 发表于 2025-9-6 10:33

  2. ----------------------------------------------
  3. Welcome to Strawberry Perl Portable Edition!
  4. * URL - http://www.strawberryperl.com/
  5. * see README.TXT for more info
  6. ----------------------------------------------
  7. Perl executable: D:\strawberry-perl-5.32.1.1-64bit-Cut\perl\bin\perl.exe
  8. Perl version   : 5.32.1 / MSWin32-x64-multi-thread

  10. D:\strawberry-perl-5.32.1.1-64bit-Cut>perl iup_threads.pl
  11. detach 1
  12. detach 2
  13. detach 3
  14. detach 4
  15. detach 5
  16. detach 6
  17. detach 7
  18. detach 8

  20. D:\strawberry-perl-5.32.1.1-64bit-Cut>
复制代码
可以运行，跳出那个程序图形。谢谢大佬！
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 04:28 , Processed in 0.018869 second(s), 9 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表