小编let*_*eda的帖子

有哪些方法可以使用Perl转换base64编码的文件？

我想查看和编辑该文件.

$ file base64result 
base64result:   XML document

$ls -l base64result 
-rw-r--r--   1 dpadmin  appadmin     52K Oct 28 12:57 base64result

这是我到目前为止所尝试的,但没有奏效:

#!/bin/perl

###################################################
# decode_base64.pl:
###################################################

use strict;
use MIME::Base64 qw( decode_base64 );

open INFILE,  '<', $ARGV[0];
open OUTFILE, '>', $ARGV[1];
binmode OUTFILE;
my $buf;
while ( $buf = <INFILE> ) {
    print OUTFILE decode_base64($buf);
}

close OUTFILE;
close INFILE;

输出:

$cat base64output
Æioz»"¢z{Äž÷¥¢—±šYìz{

我这样做(例如:):

grep a text.txt > file.log

我可以生成file.log,只要它找到了"a".我应该把它放入if吗？怎么样？有人可以举个例子吗？此时这将生成空白文件.

如何将linux日期从2015年1月14日转换为2015年1月14日

我不希望%m中的那个0

这是我正在使用的命令:

DATE=$(date --date yesterday +%d-%m-%Y)

谢谢,

如何将它与完整路径一起使用？例如：“/home/user/file.txt”？

public class ScannerSample {

  public static void main(String[] args) throws FileNotFoundException {
  //Z means: "The end of the input but for the final terminator, if any"
     String output = new Scanner(new File("file.txt")).useDelimiter("\\Z").next();
     System.out.println("" + output);
 }
}

如果我这样做：

public class ScannerSample {

  public static void main(String[] args) throws FileNotFoundException {
  //Z means: "The end of the input but for the final terminator, if any"
     String output = new Scanner(new File("/home/user/file.txt")).useDelimiter("\\Z").next();
     System.out.println("" + output);
 }
}

它产生错误：

java.io.FileNotFoundException: \home\user\file.txt (The …