我有一个比Windows搜索快得多的perl搜索工具.我以为我会给它一个图形界面,最简单的是使用html.
IE有与它没有问题,它运行良好-但我不使用IE任何更多的chrome是如此美好.
但在Chrome我得到以下错误:
Uncaught ReferenceError: getFiles is not defined
该脚本在html标头中定义为:
<script language="PerlScript" type="text/PerlScript">
sub getFiles
{
...
}
这是客户端 - 不在任何服务器上.
有关为什么会发生这种情况的任何想法？
Firexox给出了相同的结果.
我创建其他活动并希望使用工具栏后退箭头返回主要活动,但在代码下无效,请帮助我.
mToolbar = (Toolbar) findViewById(R.id.toolbar);
mToolbar.setTitle(R.string.setting);
setSupportActionBar(mToolbar);
getSupportActionBar().setDisplayHomeAsUpEnabled(true);
getSupportActionBar().setDisplayShowHomeEnabled(true);
mToolbar.setOnMenuItemClickListener(new Toolbar.OnMenuItemClickListener() {
@Override
public boolean onMenuItemClick(MenuItem item) {
switch (item.getItemId()) {
case android.R.id.home:
System.out.println("??");
finish();
return true;
}
return true;
}
});
}
我想从数字中删除几个数字24-bit binary并将其转换为18-bit binary数字.
例如:
如果是二进制数
bin24=111100111011111000100111
我想删除位23:22,15:14并且7:6输出应该是
bin18=110011111110100111
我知道我可以使用substr()和连接.只是想知道我是否可以在一行中做到这一点？
这就是我的数据在文件中的排列方式
c65194_g1_i1 -21.9509530657044 13.2266114245427 1.26719984587427e-44 1.73042474953361e-39
c29053_g1_i1 -21.7830220218917 13.0586642598416 4.05844989803944e-44 2.77100812913388e-39
c63097_g1_i1 -21.4616315169133 12.7372371455793 3.76550367403328e-43 1.71399451402538e-38
c15833_g1_i1 -21.3337075582514 12.6092961895881 9.1390133914486e-43 3.11994493417316e-38
c54104_g1_i1 -20.9476922994263 12.2232194785508 1.32699572263938e-41 3.62415801810041e-37
c72466_g1_i1 -20.7117075903545 11.9871882514396 6.8114568592363e-41 1.55023081902169e-36
c54551_g1_i1 -20.6402597636308 11.9157247731746 1.11763325249107e-40 2.18026298277025e-36
c16812_g1_i1 -19.9803901665057 11.2556673199183 1.0829030885624e-38 1.84844789073297e-34
c52174_g1_i1 -17.3946586876797 11.1994819594618 1.59840414284341e-38 2.42522308584424e-34
c61394_g3_i1 -19.7919324674417 11.0671382066934 3.99837801243703e-38 5.45998509488338e-34
c63720_g1_i1 -19.7442542319924 11.0194403765143 5.56416938462837e-38 6.9074104574357e-34
c52697_g1_i3 -19.7121643690573 10.9873369560405 6.95007628588691e-38 7.42715989045943e-34
c54027_g2_i2 -19.7096756788425 10.9848472017346 7.07063663549284e-38 7.42715989045943e-34
c55424_g1_i2 -14.9238636253627 10.5276723871648 1.67866916859075e-36 1.63736191654935e-32
c53640_g1_i1 -18.9525614294271 10.2273069100634 1.34402113000358e-35 1.22355203605092e-31
c49936_g1_i1 -18.9066537149149 10.1813654615637 1.84747309451501e-35 …我的perl代码如下所示:
my $ns = scraper {
process "table.table tr>td>a", 'files[]' => 'TEXT';
};
my $mres = $ns->scrape(URI->new($purlToScrape));
if ( ($#{$mres->{files}}) > 0 ) {
print Dumper($mres->{files} );
foreach my $key (keys %{ $mres->{files} }) {
print @{$mres->{files}}[$key]."\n";
}
}
在跑步的时候:
$VAR1 = [
'Metropolis (1927)',
'The Adventures of Robin Hood (1938)',
'King Kong (1933)',
'The Treasure of the Sierra Madre (1948)',
'Up (2009)',
'Lawrence of Arabia (1962)',
];
Not a HASH reference at /root/bash-advanced-scripts/rotten.pl line 28.
第28行是这样的:
print @{$mres->{files}}[$key]."\n";
我该如何解决？
我想首先说我不熟悉Perl.话虽这么说,我遇到了这段代码,我无法弄清楚\x下面的代码中是什么.另外,我不确定为什么在运行以下内容时没有显示任何内容:
perl -e 'print "\x7c\x8e\x04\x08"'
我在弄清楚如何"Use of uninitialized value $_ in pattern match"在perl脚本中抑制/纠正导致警告的原因时遇到了一些麻烦.
这是生成警告的单元测试脚本
Interview.t
#!/usr/bin/perl
use warnings;
use strict;
use Test::More tests => 16;
use v5.10;
use Data::Dumper;
require_ok('Interview');
# Test URLs
my $test_urls = {
'http://www.reddit.com' => 1,
'hurrdurrimasheep' => 0
};
my $interview = new Interview;
# Test $interview to see if it's an instance of our 'Interview' class
isa_ok($interview, 'Interview');
# Test to see if $interview has the member functions 'a' and 'b'
can_ok($interview, qw/a b/);
eval { $interview->a; …我正在尝试编写一个Perl脚本来转换存储在文件夹中的某些CSV文件的行结尾.我是一个Perl新手所以任何帮助将不胜感激.
use strict;
use warnings;
my @files = glob "*.csv";
foreach my $i (@files) {
system('perl -i.bak -pe "s/\R/\n/g" '.$i.'') or die "$?";
}
转换第一个文件后,脚本以此错误终止:
0 at script_conversione_linebreaks.pl at line 8.
这是进行转换的正确方法吗？或者我必须在系统语句中一次传递所有CSV文件？
我正在尝试将数组分配给我的哈希值,如下所示:
$authors->[$x]->{'books'} = @books;
$authors是一个哈希数组,包含他/她的名字,姓氏,出生日期等.现在我正在创建一个books键,我想分配一系列书籍.但是,当我尝试打印后,它只是打印数组的大小,就像我正在做的那样$value = scalar @books.
我究竟做错了什么？
我有一个像这样的csv文件:
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Sentence Skills 67,Reading Comprehension 59,Elementary Algebra 41
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Sentence Skills 44,Reading Comprehension 40
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Reading Comprehension 39
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Elementary Algebra 41,Sentence Skills 82
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Sentence Skills 104,Elementary Algebra 82
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Sentence Skills 85
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Elementary Algebra 51
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Reading Comprehension 71,Sentence Skills 54,Elementary Algebra 33
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Reading Comprehension 70,Elementary Algebra 23,Arithmetic 42,Sentence Skills 75
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Sentence Skills 96,Reading Comprehension 88
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Elementary Algebra 53,Sentence Skills 97
前5列始终相同,后5列始终采用不同的顺序.我需要保持前5列相同,并重新排序最后5列,始终按以下顺序阅读理解,句子技巧,算术,大学水平数学,初等代数
如果其中一个字符串不存在,请添加逗号
所以最终结果如下:
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Reading Comprehension 59,Sentence Skills 67,,,Elementary Algebra 41
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Reading Comprehension 40,Sentence Skills 44,,,
Last,First,A00XXXXXX,1492-12-03,2015-06-23,Reading Comprehension 39,,,,
Last,First,A00XXXXXX,1492-12-03,2015-06-23,,Sentence Skills 82,,,Elementary Algebra 41 …