Skip to content

Instantly share code, notes, and snippets.

View alexander-brett's full-sized avatar

alexander-brett

  • London
View GitHub Profile
var floors = {};
var floorsVisited = {};
var elevators = [];
var idles = [];
var up = "up";
var down = "down";
function distinct (a){
return a.filter((value, index, self) => self.indexOf(value) === index);
@alexander-brett
alexander-brett / bundle.bat
Created August 12, 2015 14:34
Create a redistributable .exe file for App-SFDC
perl -x %0 > static_SFDC.pl
perlapp ^
--add MooX::Options::Role^
--add App::SFDC::Role::^
--add Log::Log4perl::Appender::Screen^
--add WWW::SFDC::^
--bind manifests/base.xml[file=C:\perl64\site\lib\auto\Share\dist\App-SFDC-Metadata\manifests\base.xml,text,mode=666]^
--bind manifests/all.xml[file=C:\perl64\site\lib\auto\Share\dist\App-SFDC-Metadata\manifests\all.xml,text,mode=666]^
--bind plugins/retrieve.plugins.pm[file=C:\perl64\site\lib\auto\Share\dist\App-SFDC-Metadata\plugins\retrieve.plugins.pm,text,mode=777]^
@alexander-brett
alexander-brett / runUnitTests.pl
Created February 2, 2015 22:11
Run unit tests with WWW::SFDC
#!/usr/bin/env perl
use Modern::Perl '2013';
use Getopt::Long;
use WWW::SFDC::Tooling;
use Data::Dumper;
=head1 NAME
runUnitTests.pl - run SFDC unit tests and output jUnit formatted results
package xmlDiff;
use Data::Dumper;
use strict;
use warnings;
use v5.10;
$\ = "\n";
$/ = "\0";
sub parseXML {