使用Platypus从perl脚本创建Mac应用程序

Question

当使用Platypus从脚本构建应用程序时，是否有可能获得用户的输入？

我有一个简单的perl脚本。如果我从终端运行，它要求用户输入。但是，当我用Platypus构建应用程序文件时，只显示脚本的输出。

Answer 1

这方面的文档很清楚，没有双向通信；请参阅http://www.sveinbjorn.org/files/manpages/PlatypusDocumentation.html#812。

这给你留下了一些解决办法；

• 使用和期望脚本注入您的输入；
• 更新脚本以获取参数，这是一个由鸭嘴兽支持的特性；
• 如果您需要添加更多的动态信息，请考虑使用TK对话查询用户输入；
• 在mac电脑上，你可以使用一个抄本来用最少的代码调用一个对话框；

OSA脚本示例

#!/usr/bin/env perl

use strict;

sub osascript($) { system 'osascript', map { ('-e', $_) } split(/\n/, $_[0]); }

sub dialog {
  my ($text, $default) = @_;
  osascript(qq{
        tell app "System Events"
            text returned of (display dialog "$text" default answer "$default" buttons {"OK"} default button 1 with title "$(basename $0)")
        end tell
  });
}

my $result = dialog("Life, the universe and everything?", "42");

​

​