diff options
| -rw-r--r-- | challenge-272/bob-lied/perl/ch-1.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/challenge-272/bob-lied/perl/ch-1.pl b/challenge-272/bob-lied/perl/ch-1.pl index a936481f97..fb2dcd76bb 100644 --- a/challenge-272/bob-lied/perl/ch-1.pl +++ b/challenge-272/bob-lied/perl/ch-1.pl @@ -5,7 +5,11 @@ #============================================================================= # ch-1.pl Perl Weekly Challenge 272 Task 1 Defang IP Address #============================================================================= -# +# You are given a valid IPv4 address. +# Write a script to return the defanged version of the given IP address. +# A defanged IP address replaces every period “.” with “[.]". +# Example 1 Input: $ip = "1.1.1.1" Output: "1[.]1[.]1[.]1" +# Example 2 Input: $ip = "255.101.1.0" Output: "255[.]101[.]1[.]0" #============================================================================= use v5.38; |