Skip to content

Instantly share code, notes, and snippets.

@oneillo
oneillo / get_google_productfeed.pl
Created March 16, 2017 03:26
Perl script to pull products from a Shopify store and output a Google Shopping ads product feed
#!/usr/bin/perl
#v2
use strict;
use warnings;
use LWP::UserAgent;
use LWP::Simple qw(head);
use HTTP::Request;
use JSON::XS;
use POSIX qw(ceil);
@oneillo
oneillo / get_facebook_productfeed.pl
Created March 16, 2017 03:25
Perl script to pull products from a Shopify store and output a Facebook Ads product feed
#!/usr/bin/perl
use strict;
use warnings;
use LWP::UserAgent;
use LWP::Simple qw(head);
use HTTP::Request;
use JSON::XS;
use POSIX qw(ceil);
use Time::HiRes qw(usleep);
@oneillo
oneillo / create_gift_cards.pl
Created February 18, 2017 02:45
Perl script to create gift cards in a Shopify storefront via their api
#!/usr/bin/perl
# v01
use strict;
use warnings;
use LWP::UserAgent;
use HTTP::Request;
use JSON::XS;
use JSON;
use POSIX qw(ceil strftime);
@oneillo
oneillo / create_discount_codes.pl
Created February 18, 2017 02:41
Perl script to create Shopify discount codes
#!/usr/bin/perl
# v21
use strict;
use warnings;
use LWP::UserAgent;
use HTTP::Request;
use JSON::XS;
use JSON;
use POSIX qw(ceil strftime);
#!/usr/bin/perl
use strict;
use warnings;
use Net::Google::Analytics;
use Net::Google::Analytics::OAuth2;
use DateTime::Format::Strptime;
use POSIX qw(ceil strftime);
#!/usr/bin/perl
use strict;
use warnings;
use LWP::UserAgent;
use HTTP::Request;
use JSON::XS;
use POSIX qw(ceil strftime);
use Time::HiRes qw(usleep);
use Time::Local;