Perl komut dosyası üzerinde çalışıyorum. Nasıl komut satırı parametreleri geçebilir miyim?

Örnek:

script.pl "string1" "string2"

Ne yapmak istediğine bağlı. Eğer girdi dosyaları olarak iki bağımsız değişkeni kullanmak istiyorsanız, onları geçmek ve kullanmak <^ sadece . onların içeriğini okumak için.

Eğer farklı bir anlamı varsa, kullanın GetOpt::Std ve GetOpt::Long kolayca işlemek için. ::GetOpt Std sadece tek karakter anahtarları ve Destekler GetOpt::Long çok daha esnektir. GetOpt::Long:

use Getopt::Long;
my $data   = "file.dat";
my $length = 24;
my $verbose;
$result = GetOptions ("length=i" => \$length,    # numeric
                    "file=s"   => \$data,      # string
                    "verbose"  => \$verbose);  # flag

Alternatif olarak, @ARGV tüm komut satırı argümanları içeren özel bir değişkendir. $ARGV[0] ilk (yani. "string1" in dava) ve $ARGV[1] ikinci argüman. @ARGV erişim için özel bir modüle ihtiyacın yok.