Help for this page

Select Code to Download


  1. or download this
    open( $vrm, "|-:utf8", "/usr/bin/find $put -$tip $kriteriy" ) or die "
+Can't run find: $!\n";
while( <$vrm> ){
  push @svitok, $_;
...
print "ZNAK\n";
print "\n>$svitok[0]<\n";
exit;
  2. or download this
    ZNAK
Use of uninitialized value $svitok[0] in concatenation (.) or string a
+t /usr/local/src/исп/бибс/об&#137; line 122.
./svitok1
...
./svitok3

><