[LUGOS-PROG] Komunikacija z modemom

[Branko F. Graèner]

>obstaja kaksen utility program za to? Mogoče kaka enostavna rešitev v
perlu?

open (TTY,'+<',"$tty") or die "Ne morem odpreti naprave: $!\n";
    my $command="ATI7";

    print TTY $command;

    chomp(my $response=<TTY>);

    print STDERR "Modem je vrnil: ".$response."\n";

close($TTY);

in tako dalje...