All snippets of the tag decode |
 |
1-5 of 5 Entries |
 |
|
dec2bin (Perl::Function) |
Created by Marko Schulz at 2010-01-20 13:51:32 |
| sub dec2bin {
my $zahl = unpack("B32", pack("N", $_[0]));
$zahl =~ s/^0+(\d+)/$1/;
return $zahl;
} |
|
bin2dec (Perl::Function) |
Created by Marko Schulz at 2010-01-20 13:49:50 |
| sub bin2dec {
my $zahl = unpack("N", pack("B32", substr("0" x 32 . $_[0], -32)));
return $zahl;
} |
|
crypt (Perl::Scripts) |
Created by Marko Schulz at 2010-01-20 13:48:44 |
| #!/usr/bin/perl
use strict;
# Eingegebenes Passwort...
my $pass='geheim';
# Verschluesseltes Passwort z.B. aus Datei...
my $cpass='XPkzdnI74tF6E';
# **************************************************
# checken ob Eingegebenes Passwort mit dem ... |
|
urldecode (Perl::Function) |
Created by Marko Schulz at 2008-12-27 03:38:48 |
| # ***************************************
# This function decode an url string.
sub urldecode {
my $package = shift;
my ($str) = shift;
$str =~ tr/+/ /;
$str =~ s/%([a-fA-F0-9]{2,2})/chr(hex($1))/eg;
$str =~ s/<!–(.|\n)*–>//g;
return ... |
|
base64.sh (Bash::Scripts) |
Created by Marko Schulz at 2008-12-27 03:12:32 |
| #!/bin/bash
# *****************************************************************
# file: base64.sh
# date: 2007-11-01 13:00
# author: Marko Schulz - <info@tuxnet24.de>
# description: convert string whith base64.
# *******************************... |
 |
1-5 of 5 Entries |
 |
|