Как открыть файл с помощью приложения по умолчанию из Perl в Windows?

Question

У меня есть каталог файлов, которые я хотел бы регулярно сканировать и выполнять с приложением по умолчанию, с которым они связаны. Они не являются исполняемыми, поэтому system ("file.torrent"); не работает. Как вы можете запускать файлы с соответствующими приложениями в Perl?

Answer 1

Стандартный способ для Windows - ShellExecute .

В Perl вы можете сделать это с помощью ShellExecute. В пакете Win32 :: GUI .

Не пробовал. Но это выглядит достаточно просто.

Answer 2

1001 * начать *

Вы можете вручную проанализировать соответствующую часть реестра, найти соответствующее приложение и запустить его самостоятельно: но встроенная в командную строку жизнь команды запуска проще.

Итак, для вашего примера вы бы просто сделали систему ("cmd / c start file.torrent")

Answer 3

Не специфично для Perl, но вы всегда можете использовать команду 'start'. Первым аргументом будет заголовок новой открытой командной строки, а вторым аргументом - файл, который нужно открыть.

system('start "dummy title" "some file.doc"'); # opens the document in word

Answer 4

Другой вариант, который мы используем, это

system("RunDLL32.exe SHELL32.DLL,ShellExec_RunDLL file.torrent")

Answer 5

Просто чтобы выделить комментарий BeowulfOF выше

system( "test.log" )

откроет test.log в связанном приложении так же, как и введет

test.log

в командной строке

Answer 6

Никогда не используйте system () на окнах! Дрянной и плохой метод (ПА)