如何將我的shell腳本轉換爲Perl？

Question

我有一個shell腳本：

#!usr/bin/bash 
branch_name=$1 
task_name=$2 
createviewset ccm -b $branch_name -t $task_name 
source setenv $task_name 
rest of the code 

現在我想這個腳本轉換爲Perl腳本。我怎樣才能做到這一點？到目前爲止，我已經在代碼中編寫了代碼，但是這段代碼似乎不起作用。

!/usr/bin/perl 
use warnings; 
use strict; 
my branch_name; 
my task_name; 
createviewset ccm -b $branch_name -t $task_name 
source setenv $task_name 

這裏createviewset是一個現有的腳本，我在這裏打電話。

Answer 1

您應該訪問http://perlmaven.com/（提供多種語言）或http://learn.perl.org/以先學習一些Perl。

您的shell腳本不需要複製命令行值。而且還使用＃USR /斌/慶典，這將無法工作，因爲路徑或者是在/ usr /斌/ bash或（更常見）/斌/慶典：

#!/bin/bash 
createviewset ccm -b $1 -t $2 
source setenv $2 
rest of the code 

Perl的分配所有的命令行參數the array @ARGV。此示例將打印兩個參數：

#!/usr/bin/perl 
print $ARGV[0]; 
print $ARGV[1]; 

注意，編號爲0而不是1開始，如在你的bash腳本$ 1。

下一部分在Perl中運行外部（shell）命令：使用the system command。

#!/usr/bin/perl 
use strict; 
use warnings; 

system 'createviewset','ccm','-b',$ARGV[0],'-t',$ARGV[1]; 
system 'source','setenv',$ARGV[1]; 

注意，源命令不會起作用，因爲Perl腳本是不是一個shell腳本，不能「包括」 bash腳本。我很欣賞你試圖用Perl來解決你的問題，但它看起來像Bash是更好的工具。