Форум АНТИЧАТ - Показать сообщение отдельно

Накатал тут скриптик на пхп, мало ли кому пригодится

Скрипт читает файл и разбивает его на несколько txt-файлов, размер указывается в параметре $spl (Count). Filename соответственно - имя файла-источника. Скрипт понимает любые текстовые файлы.

PHP код:


		
			
<?php

    print "<title>Mail Splitter 1.0b</title>";

    

    function gui()

    {

            print "<table border='0' align='center' valign='top' width='802' height='600'>";

            print "<tr width='800' height='600'><td width='400' heigth='600'>";

            print "<h3>File.mode</h3>";

            print "<h4>Plz enter the filename and size of each file below</h4>";

            print "<form method = 'post'>";

            print "Filename: <input type='text' name='filename' length='16' maxlength='20'/><br/>";

            print "Count: &nbsp&nbsp&nbsp <input type='text' name='spl' length='16' maxlength='5'/><br/>";

            print "<input type='submit' name='go' value='Отправить'/></form><br/><br/>";

            print "</td>";

    }

    

    function filemode($filename, $split)

    {

        $source = file($filename) or die ("lol");

        $name = explode(".",$filename);

        $size = count($source);

        $files = intval($size / $split);

        if ($files == 0) die("The count is too big");

        for ($i = 0; $i<$size; $i++)

        {

            if ($i % $split == 0)

            {

                if (isset($handle)) fclose($handle);

                isset($sub) ? $sub++ : $sub = 1;

                $fname = $name[0].".part".$sub.".txt";

                $handle = fopen($fname,"w+");

            }

        fwrite($handle, $source[$i]);

        fwrite($handle, "\n");

        }

    }

    

    if (isset($_POST['filename']) && isset($_POST['spl']))

    {

        $split = $_POST['spl'];

        $filename = $_POST['filename'];

        filemode($filename, $split);

        

    }

    else gui();

?>

ps: о наличии особо кривых моментов прошу сообщить))
pps: функции для наглядности, мало ли захочется куда-то скопировать.