- Prison Code Breaker Diary -

Well you've done done me and you bet I felt it
I tried to be chill but you're so hot that I melted
I fell right through the cracks
and now I'm trying to get back
Before the cool done run out
I'll be giving it my bestest
Nothing's going to stop me but divine intervention
I reckon its again my turn to win some or learn some

I won't hesitate no more, no more
It cannot wait, I'm yours

Well open up your mind and see like me
Open up your plans and damn you're free
Look into your heart and you'll find love love love
Listen to the music of the moment people dance and sing, were just one big family
It's our God-forsaken right to be loved love loved love love

So I won't hesitate no more, no more
It cannot wait I'm sure
There's no need to complicate
Our time is short
This is our fate, I'm yours

Do you want to, come on, scootch over closer dear
And I will nibble your ear

I've been spending way too long checking my tongue in the mirror
And bending over backwards just to try to see it clearer
But my breath fogged up the glass
And so I drew a new face and I laughed
I guess what I'll be saying is there ain't no better reason
To rid yourself of vanity and just go with the seasons
It's what we aim to do
Our name is our virtue

I won't hesitate no more, no more
It cannot wait I'm sure
There's no need to complicate
Our time is short
This is our fate, I'm yours

Well open up your mind and see like me
Open up your plans and damn you're free
Look into your heart and you'll find love, love, love
so please don't please don't please don't.
There's no need to complicate
'cause our time is short
This oh this oh this is our fate I'm yours

Oh I'm yours

I won't hesitate no more
Oh no more no more no more
It's our God-forsaken right to be loved, I'm sure
Theres no need to complicate
Our time is short
This is our fate, I'm yours

No I won't hesitate no more, no more
This cannot wait I'm sure
There's no need to complicate
Our time is short
This is our fate, I'm yours, I'm yours

Language: Perl
Presiquisite: XML::Simple

Assuming we have a xml file like this: data.xml

<?xml version="1.0" encoding="UTF-8"?>
<database>
<user>
   <uname>Pete Houston</uname>
   <upass>123456</upass>
   <email>pete.houston.17187@gmail.com</email>
   <id>1</id>
</user>
<user>
   <uname>Bach Van Kim</uname>
   <upass>987654</upass>
   <email>bvkvn06@gmail.com</email>
   <id>2</id>
</user>
</database>

We will dump this XML tree using XML::Simple and Dumper package:

#!C:\perl\bin\perl.exe -w
use strict;
use XML::Simple;
use Data::Dumper;

print Dumper( XML::Simple->new()->XMLin("data.xml"));

The result shows:

$VAR1 = {
         'user' => {
                   '1' => {
                          'email' => 'pete.houston.17187@gmail.com',
                          'uname' => 'Pete Houston',
                          'upass' => '123456'
                        },
                   '2' => {
                          'email' => 'bvkvn06@gmail.com',
                          'uname' => 'Bach Van Kim',
                          'upass' => '987654'
                        }
                 }
       };

The method: XML::Simple->new() will create an object to handle XML file, and then input file will be called through method XMLin("filename.xml");
A very simple way!

I used to install ActiveState Perl because I thought it's the best Perl distribution on Windows. However, several days ago I've found out that Strawberry Perl is also port to Windows.
After a try, I feel like Strawberry Perl is much more better than ActiveState Perl.
Like what?

- Well, ActiveState Perl is commercial, then you're limited to use only from its vendor repositories. It would be a trouble if you want to install some packages from CPAN to your system. Yes, very limited!
- On the other hand, Strawberry Perl is an open-source, community-developed package, very light and useful, supporting all the most needed package for programmers and developers. Yes, it's free! Additionally, you can access CPAN shell and install any package from CPAN easily. It's quick and convenient in many ways.

Here the instruction on how to install Gtk+ for Perl on Windows.
There are two options:

1. Simply download and setup CamelBox:

2. Using ActivePerl:
+ Download and install ActivePerl: https://www.activestate.com/activeperl/downloads/
+ Download and install Gtk+ Environment for Windows: http://cdnetworks-kr-2.dl.sourceforge.net/project/gladewin32/gtk%2B-win32-runtime/2.8.20/gtk-2.8.20-win32-1.exe
+ Open command and type:

ppm repo add http://www.lostmind.de/gtk2-perl/ppm/
ppm install Gtk2

+ Finally, restart your Windows

There are many ways but those two are the best options of all that I prefer.

Have fun!

Under Windows, it's best to use ActiveState Perl.
In order to manage your Perl package, you might want to use either:

1. Command-line approach:

C:\>perl -MCPAN -e shell;

2. Easier management through GUI:

C:\>ppm

PPM is Perl Package Manager provided by ActiveState.

Have fun!

By using the utility netsh, you may find it easily to manage your network. Yes, it's pretty much convenient.

1. Show network information:

netsh interface ip show config

2. Change setting of ip address, mask and gateway

netsh interface ip set address name="Network Name" static ip_address subnet_mask gateway 1

Sample: set Local Area Connection to static address 192.111.215.96, mask = 255.255.255.252, gateway = 192.111.215.1

netsh interface ip set address name="Local Area Connection" static 192.111.215.96 255.255.255.252 192.111.215.1 1

2. Change DNS setting
+ set DNS

netsh interface ip set dns "Network Name" static dns_address

+ add DNS

netsh interface ip add dns "Network Name" dns_address index=2

3. Export IP setting to file:

netsh -c interface dump > C:\setting.txt

4. Import IP setting from file:

netsh -f C:\setting.txt

or

netsh exec C:\setting.txt

5. Using DHCP
+ Simply add 'dhcp' at the end of your command :D

netsh interface ip set address "Local Area Connection" dhcp
netsh interface ip set dns "Local Area Connection" dhcp

Have fun!