Cyber Ghost: Perl
Cyber Ghost 25 2009 16:29 31 2009 01:19 |
=) |
Cyber Ghost 08 2009 06:57 28 2009 08:47 |
=)
Perl. Copy Flash Perl #!/usr/bin/perl -w# # # "0""0""/home/cyber/Scripts/""flash""$dir/$_""$_ ""cp $_ $directory/" |
MoRS 10 2009 20:36 |
, ) |
MoRS 19 2009 16:29 22 2009 19:02 |
/media .. , .hal-mtab vfat ( ). |
Cyber Ghost 04 2009 04:24 |
/media ? =))))) - /media, /mnt =)))))))))) |
MoRS 17 2009 17:26 |
asp 7 )) ) |
Cyber Ghost 02 2009 13:42 04 2009 10:48 |
=)))) , ! =)))) Perl #!/usr/bin/perl -w # "test.log""Dublicate\n""No dublicate\n"">>test.log""$chkline\n""Line $chkline add into log file\n"; } |
Cyber Ghost 03 2009 06:36 12 2009 11:28 |
Perl #!/usr/bin/perl -w # "test.log""Dublicate\n"">>test.log""$chkline\n""Line $chkline add into log file\n"; } |
MoRS 12 2009 09:39 12 2009 09:41 |
, .. . , STDIN , . , .. . .. |
MoRS 12 2009 11:03 12 2009 11:04 |
, . ( stdin )
Perl #!/usr/bin/perl -w # "test.log""Dublicate\n"">>test.log""$chkline\n""Line $chkline add into log file\n"; } } |
Cyber Ghost 12 2009 11:28 12 2009 11:29 |
!
Perl #!/usr/bin/perl -w "test.log""Dublicate\n"">>test.log""$chkline\n""Line $chkline add into log file\n"; } |
MoRS 12 2009 11:36 |
)) |
Cyber Ghost 12 2009 16:31 |
=))))) =)))) |
Cyber Ghost 30 2009 13:33 30 2009 13:36 |
-100
Perl #!/usr/bin/perl -w # "$file"">>result.log""$host$data[$i] $status\n""\n\n" |
MoRS 30 2009 13:34 |
phasma 31 2009 01:19 |
Text #!/bin/bash
if [ ! -e $1 ]; then echo "Please, specify URL list" else if [ $# -ne 2 ]; then echo "Please, specify referer" else for _URL in $( cat $1); do wget -O - --user-agent="Mozilla/5.0 (Windows; U; Windows NT 6.1; es-AR; rv:1.9.1.6) Gecko/20091201 Firefox/3.5.6" --referer="$2" $_URL done fi fi |
> 1