Sky <[EMAIL PROTECTED]> wrote:
> foreach $keys (keys $listing) {
>   $listing{$keys}=~ s/data\///gi;
> }
> 
> ? :)
> 

s|data/||gi for values %listing;
                       ^

-- 
Steve

perldoc -qa.j | perl -lpe '($_)=m("(.*)")'

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to