[email protected] wrote:
/:\/\//
Alternative: m~://~ > print( ( split /\// )[ 2 ] ); print +( split m~/~ )[ 2 ]; -- Ruud -- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected] http://learn.perl.org/
[email protected] wrote:
/:\/\//
Alternative: m~://~ > print( ( split /\// )[ 2 ] ); print +( split m~/~ )[ 2 ]; -- Ruud -- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected] http://learn.perl.org/