Skip to content

Instantly share code, notes, and snippets.

=head1 Zotero API documentation
=head2 Setting up a simplified development environment
The easiest way to set up a development environment for Zotero is to download
L<http://wiki.github.com/bard/mozrepl/|MozRepl>, an interactive shell available
by telnetting to localhost on port 4242 (by default). Linux and Mac OS X users
can use the built in telnet client. Windows users should use
L<http://www.chiark.greenend.org.uk/~sgtatham/putty/|Putty>.There's also a
firefox plugin to provide MozRepl access
=head1 Zotero API documentation
=head2 Setting up a simplified development environment
The easiest way to set up a development environment for Zotero is to download
L<http://wiki.github.com/bard/mozrepl/|MozRepl>, an interactive shell available
by telnetting to localhost on port 4242 (by default). Linux and Mac OS X users
can use the built in telnet client. Windows users should use
L<http://www.chiark.greenend.org.uk/~sgtatham/putty/|Putty>.There's also a
firefox plugin to provide MozRepl access
Caught exception in Survey::Perl::Controller::Survey->finish_survey "Can't use string ("Mac OS X for personal computers>") as an ARRAY ref while "strict refs" in use at /Users/kd/Desktop/dev/perlsurvey/Data-PerlSurvey2007-1.00/Survey-Perl/script/../lib/Survey/Perl/Controller/Survey.pm line 39."
Request
bless({
_path => "survey/finish",
action => "/survey/finish_survey",
address => "127.0.0.1",
#!/usr/bin/perl
use warnings;
use strict;
use Path::Class;
use File::Basename;
use File::Path qw/make_path/;
use String::ShellQuote;
# get the root dir of the repository
my $git_root = `cdup="\$PWD/\$(git rev-parse --show-cdup)" && test -n "\$cdup" && echo \$cdup`;
> pop <- read.csv('popdensitygraph.csv')
> names(pop)
[1] "X" "Y"
> summary(lm(pop$X~pop$Y))
Call:
lm(formula = pop$X ~ pop$Y)
Residuals:
Min 1Q Median 3Q Max
> pop <- read.csv('popdensitygraph.csv')
> names(pop)
[1] "X" "Y"
> summary(lm(pop$X~pop$Y))
Call:
lm(formula = pop$X ~ pop$Y)
Residuals:
Min 1Q Median 3Q Max
> library(gvlma)
> gvlma(lm(pop$X~pop$Y))
Call:
lm(formula = pop$X ~ pop$Y)
Coefficients:
(Intercept) pop$Y
0.2172 0.7738
sub _get_groups_data_structure {
my ($self, $groups ) = @_;
$groups ||= $self->groups;
## this implementation courtesy of ribasushi. Must acknowledge in the
## paper.
my $inject = {
-1 => 'leaf',
0 => { some_data => 'lvl0' },
1 => { some_data => 'lvl1' },
=head3 condition
The condition argument describes the C<ON> clause of the C<JOIN>
expression used to connect the two sources when creating SQL queries.
To create simple equality joins, supply a hashref containing the
remote table column name as the key(s), and the local table column
name as the value(s), for example:
{ 'foreign.author_id' => 'self.id' }
[%- MACRO render_submenu(node) BLOCK -%]
[%- FOREACH item IN node.getAllChildren -%]
-[% NEXT IF item.getNodeValue == "descr.txt" %]
+[% NEXT IF item.getNodeValue == 0 %]
<li> [% print_metadata(node) %]
-[% IF item.getAllChildren.size %] <ul> [% render_submenu(item) %] </ul> [% END %] </li>
-[%- END -%]
+[% IF item.getAllChildren.size %] <ul> [% render_submenu(item) %] </ul>
+[% ELSIF item.getNodeValue !=0 %] <li> [% render_node(item) %] [% END %]
+[% END %] </li>