Rozdiely pre scripts/ep/secure-atl/encoder.pl medzi verziami 1.3 a 1.4
| verzia 1.3, 2002/02/12 00:34:23 |
verzia 1.4, 2002/03/13 13:51:03 |
| Riadok 41 my $AUTO_ENCODE_1_PREFIX = ''; |
|
| Riadok 41 my $AUTO_ENCODE_1_PREFIX = ''; |
|
| my $START_SWITCH_CASE_STR = 'aAbBcC'; |
my $START_SWITCH_CASE_STR = 'aAbBcC'; |
| my $END_SWITCH_CASE_STR = 'CcBbAa'; |
my $END_SWITCH_CASE_STR = 'CcBbAa'; |
| |
|
| |
print '-' x 60, "\n"; |
| |
print(STDERR "Encoder starts...\n"); |
| |
print(STDERR "To use encode shortcuts, specify by: %<string>%\n"); |
| |
print(STDERR " then use \"<string> <string2>\" to encode <string2>\n"); |
| |
printf(STDERR "To decode <string> use: %s <string> %s\n", |
| |
$START_ENCODE_1_STR, $END_ENCODE_1_STR); |
| |
printf(STDERR "To switch case of <string> use: %s <string> %s\n", |
| |
$START_SWITCH_CASE_STR, $END_SWITCH_CASE_STR); |
| |
print '-' x 60, "\n"; |
| |
|
| while (<STDIN>) { |
while (<STDIN>) { |
| # chomp; |
# chomp; |
Platon Group <platon@platon.sk> http://platon.sk/
|
|