Re: operator help

[Ron Grabowski]

> @operators = ("\<","\<\=","\=","\!\=","\>\=","\>");
> ### lets say user chose $operators[0] (<) and it is now stored in $fOp1
> 
> if ($fromTime $fOp1 $fTime);
> {
>         &something();
> }

@op = qw|< <= = != >= >|;

 if ( eval "$fromTime $op[0] $fTime" ) {
  print `perldoc -f eval`;
 }
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users