Skip to content

Instantly share code, notes, and snippets.

@mimicmod
mimicmod / globster-pmnotify.pl
Last active January 31, 2016 15:09
Notify operators about incomming private message - script for the Globster direct connect client
#!/usr/bin/perl
use strict;
use warnings;
use Net::DBus;
use XML::Simple;
use Net::DBus::Reactor;
# create xml object
my $xml = new XML::Simple;
@mimicmod
mimicmod / globster-releases.pl
Last active February 7, 2016 10:26
Database of released files - script for the Globster direct connect client
#!/usr/bin/perl
# Settings
my $dbfile = "/etc/globster/releases.db";
my $dbusaddr = "unix:abstract=/tmp/dbus-X47loh59IQ,guid=d5dcec9511d7062467a016ff0000002e";
my $cmdprefix = "+!-";
# Hubs to link (Globster hub IDs)
my @hubs = (1,3);
@mimicmod
mimicmod / globster-usercheck.pl
Created January 10, 2016 15:03
Userinfo check on login - script for the Globster direct connect client
#!/usr/bin/perl
use strict;
use warnings;
use Net::DBus::Reactor;
use Net::DBus;
use Switch;
use XML::Simple;
# create xml object
@mimicmod
mimicmod / gobster-responder.pl
Last active January 10, 2016 15:01
Chat responder with multiple responses support - script for the Globster direct connect client
#!/usr/bin/perl
use strict;
use warnings;
use Net::DBus::Reactor;
use Net::DBus;
use XML::Simple;
# create xml object
my $xml = new XML::Simple;
@mimicmod
mimicmod / globster-xmlconf.pl
Last active January 10, 2016 14:58
Hubs configuration in XML format based on globsterctl - script for the Globster direct connect client
#!/usr/bin/perl
use strict;
use warnings;
use XML::Simple;
# create xml object
my $xml = new XML::Simple;
# read XML file
@mimicmod
mimicmod / uhub-mimicmod-install.sh
Last active December 25, 2023 23:14
uHub MiMic Mod install and config script
#!/bin/bash
# uHub MiMic Mod install and config script
# Dependencies:
# - bash
# - git
# - all other uhub dependencies
echo -e "\e[1;34mHello, this script will install uhub MiMic Mod on your machine and configure your hub.\e[0m"