masto

// Trivial program that sends the single byte to tickle a NABU Internet Adapter awake
// and then dumps out any response.

#include <SoftwareSerial.h>

SoftwareSerial mySerial(10, 11); // RX, TX

void setup() {
  Serial.begin(115200);
  Serial.println("Started");

masto

{
    "GeneralInfo": {
        "Target Model": "NX4832F035_011",
        "Header 2 XOR Key": "0x9db6482e" # not correct
    },
    "Header1": {
        "unknown0": 0,
        "editorVersionMain": 1,
        "editorVersionSub": 63,
        "editorVendor": 78,

masto

{
    "GeneralInfo": {
        "Target Model": "NX4832F035_011",
        "Header 2 XOR Key": "0x9db6482e" # not correct
    },
    "Header1": {
        "unknown0": 0,
        "editorVersionMain": 1,
        "editorVersionSub": 63,
        "editorVendor": 78,

masto

masto

/tmp/test ❯ cat test.zsh
#!/bin/zsh

set -x

W='-iname *.txt'
find . ${=W}

set +x
/tmp/test ❯ zsh test.zsh

masto

#!/usr/bin/env perl

use strict;
use warnings;

my $count = shift
  or die "Usage: $0 <file count>\n";

my @files = map { open my $file, ">", "part$_.out" or die "open: $!"; $file; } 1..$count;

masto

-- Assumption: we want every unique constraint in the public schema to be deferrable
-- 1. Non-table-constraint unique indexes are made into deferrable constraints
-- 2. Non-deferrable table constraints are dropped and re-created deferrable

CREATE OR REPLACE FUNCTION
  fixup_unique_constraints()
  RETURNS void
AS $$
DECLARE
  idx RECORD;

masto

use warnings;
use strict;

package Catalyst::Plugin::ConfigLoaderLocalHack;
our $VERSION = '1.00';

use Moose::Role;
use namespace::autoclean;

around 'find_files' => sub {

masto

#!/usr/bin/env perl

use strict;
use warnings;

package Foo;

use parent 'Rose::Object';

use Rose::Object::MakeMethods::Generic (