Tenho visto isto postar aqui:

perl -e '@ d \u003d localtime ((stat (shift)) [9]); printf "% 02d-% 02d-% 04d% 02d:% 02d:% 02d \ n", $ d [3], $ d [ 4] 1, $ d [5] 1900, $ d [2], $ d [1], $ d [0] 'file1.txt

Preciso usá-lo dentro de uma perl script. Pode alguém por favor me ajude.

Certo. Recorte e cole-o no seu texto que você está usando para escrever a Perl script. Let us know how it turns out.

ShawnMilo

Obrigado, eu copiado em toda a minha declaração perl script, mas ele está dando synatax erro:

compare_forms2.pl erro de sintaxe na linha 27, próximo "perl -e "

Aqui é o código que usei na minha por script:

perl -e '@ d \u003d localtime ((stat (shift)) [9]); printf "% 02d-% 02d-% 04d% 02d:% 02d:% 02d \ n", $ d [3], $ d [ 4] 1, $ d [5] 1900, $ d [2], $ d [1], $ d [0]
'$ ddt_dir_prod [1];

Onde $ ddt_dir_prod [1] contém um arquivo válido.

Ou você está brincando, ou você não tem nenhum negócio escrever código hoje. Por favor, pegue uma base Perl ler um livro ou Web tutorial e deixe-nos saber quando você pode escrever um simples Perl script e compreender o que faz.

Atenciosamente,
ShawnMilo

Peço desculpa para a grosseria do meu comentário. Sei que às vezes saem mais severamente do que eu queria, e também pensei que o meu primeiro post foi engraçado.

Mas com toda a seriedade, que não parecem compreender algumas coisas muito básicas, e isso não é realmente ajudá-lo se nós te deu as respostas, pois você não seria capaz de aplicá-las. Além disso, você ainda nem sequer disse o que você está tentando realizar. Isso torna quase impossível para alguém para ajudá-lo a qualquer maneira.

Se você receber alguma coisa, mesmo semi-trabalho, pós-lo e alguém pode ser capaz de ajudá-lo a solucioná-lo. Mas, como eu disse, não parece que você sabe o suficiente Perl (ou talvez de programação em geral) a fazer esta tentativa, sem um estudo mais aprofundado.

ShawnMilo

ya ur direita. Eu sou muito novo para este campo .. como você disse têm de aprender os conceitos básicos first.Any forma muito obrigado.