Tryag File Manager
Home
-
Turbo Force
Current Path :
/
home
/
cluster1
/
data
/
bu01
/
1121861
/
jlex
/
rdloci
/
Upload File :
New :
File
Dir
/home/cluster1/data/bu01/1121861/jlex/rdloci/get_repeats.php4
<? $sequences = $_POST["sequences"]; $sequences = explode("\n",$sequences); $word_set = array(); foreach($sequences as $sequence) { $sequence = trim($sequence); if((!ereg("^>",$sequence)) && ($sequence != "")) { $sequence = str_replace("*","",$sequence); $sequence = trim($sequence); $words = explode(" ",$sequence); foreach($words as $word) { if(!in_array($word,$word_set)) { $word_set[] = $word; } } } } $out = fopen($file_name.".txt","w"); foreach($word_set as $word) { fwrite(">$word\n$word\n\n"); } fclose($out);