This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
use strict; | |
use warnings; | |
use Getopt::Long; | |
use Pod::Usage; | |
use PDF::API2; | |
sub parseBox { | |
my ($box) = @_; | |
if ($box =~ /^\s*([\-\.\d]+)\s+([\-\.\d]+)\s+([\-\.\d]+)\s+([\-\.\d]+)\s*$/) { |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
use strict; | |
use warnings; | |
use Getopt::Std; | |
use Device::Gsm::Pdu; | |
use XPlat::SerialPort; | |
# defaults | |
our ($opt_p, $opt_t, $opt_v, $opt_h, $opt_n); | |
$opt_t = 3; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/* | |
RGB | |
*/ | |
typedef class rgb | |
{ | |
public: | |
float r; // percent | |
float g; // percent | |
float b; // percent |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
package StdBinmode; | |
BEGIN | |
{ | |
if ($^O eq 'MSWin32') | |
{ | |
eval <<END; | |
use Encode; | |
use Encode::Locale; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
# Kademlia DHT implementation in Perl + AnyEvent. | |
# Copyright © 2013 PE Volodymyr Shymanskyy. All rights reserved. | |
# License: GNU GPL v2 (http://www.gnu.org/licenses/gpl-2.0.txt) | |
our ($DBG, $DUMP); | |
$Data::Dumper::Terse = 1; | |
$Data::Dumper::Indent = 1; | |
package Kad { | |
use Readonly; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
# A better way to get external ip address | |
# Checks external ip address on random services until 2 of them return same result. | |
# Copyright © 2013 PE Volodymyr Shymanskyy. All rights reserved. | |
# Public Domain code | |
use strict; | |
use warnings; | |
use List::Util qw(shuffle); | |
sub get_ext_ip { |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
# Perl implementation of 'drunken bishop' (OpenSSL hash visualization algorithm) | |
# Copyright © 2013 PE Volodymyr Shymanskyy. All rights reserved. | |
# License: GNU GPL v2 (http://www.gnu.org/licenses/gpl-2.0.txt) | |
=pod | |
Bishop Peter finds himself in the middle of an ambient atrium. There | |
are walls on all four sides and apparently there is no exit. The floor is | |
paved with square tiles, strictly alternating between black and white. His | |
head heavily aching - probably from too much wine he had before - he | |
starts wandering around randomly. Well, to be exact, he only makes |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/false | |
# This file is part of Espruino, a JavaScript interpreter for Microcontrollers | |
# | |
# Copyright (C) 2013 Gordon Williams <[email protected]> | |
# | |
# This Source Code Form is subject to the terms of the Mozilla Public | |
# License, v. 2.0. If a copy of the MPL was not distributed with this | |
# file, You can obtain one at http://mozilla.org/MPL/2.0/. | |
# | |
# ---------------------------------------------------------------------------------------- |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env node | |
/* | |
1. Install Blynk App for iOS and Anrdoid | |
2. Login or Create new account in the Blynk App | |
3. Add project by scanning this QR: | |
http://tiny.cc/joule-blynk | |
4. Send Auth Token to your email, and update AUTH variable in this sketch |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/* | |
* This utility allows you to cross-connect two serial channels | |
* using any Arduino-compatible device. | |
* | |
* This is usefull for: | |
* Checking wiring | |
* Converting baud rate | |
* Sending AT commands | |
* etc. | |
* |
OlderNewer