:dromedary_camel: Introductory course for Perl 5 through examples, geared towards VLSI engineers

Collect / manage / work on a set of Perl Intro Talks

Read-only mirror of https://gitlab.gnome.org/GNOME/perl-glib-object-introspection

#! /bin/bash PATH=/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/usr/local/sbin:~/bin export PATH #=============================================================================================== # System Required: CentOS6.x (32bit/64bit) # Description: Install Shadowsocks(Python) for CentOS # Author: Teddysun <i@teddysun.com> # Intro: http://teddysun.com/342.html #=============================================================================================== clear echo "#############################################################" echo "# Install Shadowsocks(Python) for CentOS6.x (32bit/64bit)" echo "# Intro: http://teddysun.com/342.html" echo "#" echo "# Author: Teddysun <i@teddysun.com>" echo "#" echo "#############################################################" echo "" # Get IP address IP=`ifconfig | grep 'inet addr:'| grep -v '127.0.0.*' | cut -d: -f2 | awk '{ print $1}' | head -1`; # Install Shadowsocks function install_shadowsocks(){ rootness disable_selinux pre_install download_files config_shadowsocks iptables_set install } # Make sure only root can run our script function rootness(){ if [[ $EUID -ne 0 ]]; then echo "Error:This script must be run as root!" 1>&2 exit 1 fi } # Disable selinux function disable_selinux(){ if [ -s /etc/selinux/config ] && grep 'SELINUX=enforcing' /etc/selinux/config; then sed -i 's/SELINUX=enforcing/SELINUX=disabled/g' /etc/selinux/config setenforce 0 fi } # Pre-installation settings function pre_install(){ #Set shadowsocks config password echo "Please input password for shadowsocks:" read -p "(Default password: teddysun.com):" shadowsockspwd if [ "$shadowsockspwd" = "" ]; then shadowsockspwd="teddysun.com" fi echo "password:$shadowsockspwd" echo "####################################" get_char(){ SAVEDSTTY=`stty -g` stty -echo stty cbreak dd if=/dev/tty bs=1 count=1 2> /dev/null stty -raw stty echo stty $SAVEDSTTY } echo "" echo "Press any key to start...or Press Ctrl+C to cancel" char=`get_char` #Install necessary dependencies yum install -y wget unzip openssl-devel gcc swig python python-devel python-setuptools autoconf libtool libevent yum install -y automake make curl curl-devel zlib-devel openssl-devel perl perl-devel cpio expat-devel gettext-devel #Current folder cur_dir=`pwd` cd $cur_dir } # Download files function download_files(){ if [ -f ez_setup.py ]; then echo "ez_setup.py [found]" else echo "ez_setup.py not found!!!download now......" if ! wget --no-check-certificate https://bitbucket.org/pypa/setuptools/raw/bootstrap/ez_setup.py; then echo "Failed to download ez_setup.py!" exit 1 fi fi # Download shadowsocks chkconfig file if ! wget --no-check-certificate https://raw.githubusercontent.com/teddysun/shadowsocks_install/master/shadowsocks -O /etc/init.d/shadowsocks; then echo "Failed to download shadowsocks chkconfig file!" exit 1 fi } # Config shadowsocks function config_shadowsocks(){ cat > /etc/shadowsocks.json<<-EOF { "server":"${IP}", "server_port":8989, "local_address": "127.0.0.1", "local_port":1080, "password":"${shadowsockspwd}", "timeout":600, "method":"aes-256-cfb", "fast_open":false, "workers":1 } EOF } # iptables set function iptables_set(){ /sbin/service iptables status 1>/dev/null 2>&1 if [ $? -eq 0 ]; then /etc/init.d/iptables status | grep '8989' | grep 'ACCEPT' >/dev/null 2>&1 if [ $? -ne 0 ]; then /sbin/iptables -A INPUT -m state --state NEW -m tcp -p tcp --dport 8989 -j ACCEPT /etc/rc.d/init.d/iptables save /etc/init.d/iptables restart fi fi } # Install function install(){ which pip > /dev/null 2>&1 if [ $? -ne 0 ]; then python ez_setup.py install easy_install pip fi if [ -f /usr/bin/pip ]; then pip install M2Crypto pip install greenlet pip install gevent pip install shadowsocks if [ -f /usr/bin/ssserver ]; then chmod +x /etc/init.d/shadowsocks # Add run on system start up chkconfig --add shadowsocks chkconfig shadowsocks on # Run shadowsocks in the background /etc/init.d/shadowsocks start else echo "" echo "Shadowsocks install failed! Please visit http://teddysun.com/342.html and contact." exit 1 fi clear echo "" echo "Congratulations, shadowsocks install completed!" echo -e "Your Server IP: \033[41;37m ${IP} \033[0m" echo -e "Your Server Port: \033[41;37m 8989 \033[0m" echo -e "Your Password: \033[41;37m ${shadowsockspwd} \033[0m" echo -e "Your Local IP: \033[41;37m 127.0.0.1 \033[0m" echo -e "Your Local Port: \033[41;37m 1080 \033[0m" echo -e "Your Encryption Method: \033[41;37m aes-256-cfb \033[0m" echo "" echo "Welcome to visit:http://teddysun.com/342.html" echo "Enjoy it!" echo "" else echo "" echo "pip install failed! Please visit http://teddysun.com/342.html and contact." exit 1 fi } # Uninstall Shadowsocks function uninstall_shadowsocks(){ printf "Are you sure uninstall Shadowsocks? (y/n) " printf "\n" read -p "(Default: n):" answer if [ -z $answer ]; then answer="n" fi if [ "$answer" = "y" ]; then NODE_PID=`ps -ef | grep -v grep | grep -v ps | grep -i '/usr/bin/python /usr/bin/ssserver' | awk '{print $2}'` if [ ! -z $NODE_PID ]; then for pid in $NODE_PID do kill -9 $pid if [ $? -eq 0 ]; then echo "Shadowsocks process[$pid] has been killed" fi done fi chkconfig --del shadowsocks # delete config file rm -f /etc/shadowsocks.json rm -f /var/run/shadowsocks.pid rm -f /etc/init.d/shadowsocks pip uninstall -y shadowsocks if [ $? -eq 0 ]; then echo "Shadowsocks uninstall success!" else echo "Shadowsocks uninstall failed!" fi else echo "uninstall cancelled, Nothing to do" fi } # Initialization step action=$1 [ -z $1 ] && action=install case "$action" in install) install_shadowsocks ;; uninstall) uninstall_shadowsocks ;; *) echo "Arguments error! [${action} ]" echo "Usage: `basename $0` {install|uninstall}" ;; esac

An Intro to Perl Talk I gave at the January Houston Perl Monger's

Slides *and* code for intro to Perl

perl6intro-zh

No description available

Introducción de como se utiliza perl

Spring semester 2012

*UNOFFICIAL COPY* Dynamically create Perl language bindings

Perl Glib Object-Introspection bindings

DBIx::Class::IntrospectableM2M - Introspect many-to-many shortcuts

Toronto Perl Mongers: July 2016 Perl 6 talk "Intro Into Perl 6 Regexes and Grammars" lides source

Sources from intro to perl for easy viewing later

A short intro to Perl and RDF, in German.

Intro to Perl slides, presented at University of Portsmouth 2014

Intro to Google@Home project, presented at London Perl Workshop 2014

Simple perl script that allows you to append intro+outro files and overlay images to an exisiting video file.

Intro to Perl

An introduction to Perl

Converting python intProg exercises into perl, to learn the basics.

No description available

No description available

Intro to Perl 5.

This will be my attempts at learning Perl

Perl language intro notes

No description available

Traducción al español de perl6intro

No description available