question concerning remove portion of the RADIUS::UserFile module

[jewel464g]

Link to module:

http://search.cpan.org/~oevans/RADIUS-UserFile-1.01/UserFile.pm

I finished the portion of my code that searches the user file and if the user isn't it in adds a new one. Not to difficult using this module. However, when I get to the remove portion, it doesn't seem to work. Anyone got any experience with this??? Here's my remove code.

#! /usr/local/bin/perl
use FileHandle;
use RADIUS::UserFile;

$| = 1;

my $username = $ARGV[0] || '';


my $users = new RADIUS::UserFile
File => 'users.txt',
Check_Items => [ qw(Password Auth-Type) ];

$users->remove($username);


Thanks,
Jewels

http://www.scriptchick.com/

When faced with a decision, always ask, 'Which would be the most fun?'

 

[jewel464g]

ok, nevermind. After some playing I figured it out.

FYI: Add this line after the remove statment.

$users->update
or die("$0: There was a problem updating .\n");

http://www.scriptchick.com/

When faced with a decision, always ask, 'Which would be the most fun?'

 

[PaulTEG]

Jewel,

basically you need to commit the change after the deletion, is this correct?

--Paul

Nancy Griffith - songstress extraordinaire,
and composer of the snipers anthem "From a distance ...

 

[jewel464g]

Exactly

http://www.scriptchick.com/

When faced with a decision, always ask, 'Which would be the most fun?'