I have a billing program that generates dynamic files in
/usr/private/platypusd/config_files/pms.1234, where 12345 is a random
number and never the same twice.

This file contains some date separated by the pipe sign. Example:

username|password.

I have a perl script that is called by this billing program to parse
the file pms.random# from the directory above. The perl script is as
follows.

#!/usr/bin/perl
open(INFILE, "@ARGV[0]");
$infile = <INFILE>;
($username,$password) = split(/|/, $infile);
close(INFILE);

@calladduser = ("/usr/sbin/adduser -g 100 -d /home/sites/home/
$password -s /sbin/nologin $username","n");
system("@calladduser");

print ("New User $username has been successfully added!n");
print ("New User password: $passwordn");
print ("New User Home Directory: /home/sites/home/$usernamen");

open(OUTFILE,
">>/usr/local/private/platypusd/secure_dir/plat_adduser.log");
print OUTFILE ("@calladduser");
close(OUTFILE);

I get an error of not such file or directory when the billing program
calls this script to parse the file. I don't understand much about
perl and I think the script is not looking for the file, maybe it
doesn't know where the file to be parse is. I get an error of No such
file or directory.

I would appreciate if someone could help me on this. Thanks in
advance.

paul