脚本
#!/usr/bin/perl -w
use MongoDB;
use Data::Printer;
my $client = MongoDB::MongoClient->new();
my $db = $client->get_database('students');
my $grades = $db->get_collection('grades');
my $stu = $grades->find->fields({student_id=>1,_id=>0});
while (my $row = $stu->next){
p($row);
}
Run Code Online (Sandbox Code Playgroud)
输出:
\ {
student_id 198
}
\ {
student_id 199
}
Run Code Online (Sandbox Code Playgroud)
预期产出:
198
199
Run Code Online (Sandbox Code Playgroud) 我在文件上运行以下命令xyz。
sed -i 's/abc \"/abc \^@\"/g' xyz
Run Code Online (Sandbox Code Playgroud)
但我没有得到想要的输出。
如果我手动输入ctrl+ v+@它在 vi 编辑器中可见,^@但在上面的命令输出中不可见。