Instantly convert code snippets from Perl to Python with our free online code converter. Transform your code easily and accurately.
Experience the full potential of AI-driven code conversion and transformation!
We prioritize your code's security and privacy. Your code is not stored on our servers and is only temporarily processed for conversion. We use OpenAI's secure servers for the conversion process, ensuring your code remains confidential.
Perl is a family of two high-level, general-purpose, interpreted programming languages.
Python is a high-level, interpreted, interactive and object-oriented scripting language. Python is designed to be highly readable. It uses English keywords frequently where as other languages use punctuation, and it has fewer syntactical constructions than other languages.
sub is_palindrome {
my $str = shift;
$str =~ s/[^a-zA-Z0-9]//g;
$str = lc($str);
return $str eq reverse($str);
}
# Example usage
print is_palindrome("A man, a plan, a canal: Panama") ? "true\n" : "false\n";
print is_palindrome("race a car") ? "true\n" : "false\n";
def is_palindrome(s):
s = ''.join(c.lower() for c in s if c.isalnum())
return s == s[::-1]
# Example usage
print(is_palindrome("A man, a plan, a canal: Panama")) # True
print(is_palindrome("race a car")) # False
sub bubble_sort {
my @arr = @_;
my $n = scalar @arr;
for my $i (0..$n-1) {
for my $j (0..$n-$i-2) {
if ($arr[$j] > $arr[$j+1]) {
@arr[$j,$j+1] = @arr[$j+1,$j];
}
}
}
return @arr;
}
my @arr = (64, 34, 25, 12, 22, 11, 90);
print join(" ", bubble_sort(@arr)) . "\n";
def bubble_sort(arr):
n = len(arr)
for i in range(n):
for j in range(0, n - i - 1):
if arr[j] > arr[j + 1]:
arr[j], arr[j + 1] = arr[j + 1], arr[j]
return arr
# Example usage
arr = [64, 34, 25, 12, 22, 11, 90]
sorted_arr = bubble_sort(arr.copy())
print(sorted_arr)
Convert Perl to JavaScript
Open ConverterConvert Perl to TypeScript
Open ConverterConvert Perl to Java
Open ConverterConvert Perl to C
Open ConverterConvert Perl to C++
Open ConverterConvert Perl to C#
Open ConverterConvert Perl to Go
Open ConverterConvert Perl to Dart
Open ConverterConvert Perl to Ruby
Open ConverterConvert Perl to Swift
Open ConverterConvert Perl to Kotlin
Open ConverterConvert Perl to Rust
Open ConverterConvert Perl to Scala
Open ConverterConvert Perl to PHP
Open ConverterConvert Perl to R
Open ConverterConvert Perl to Haskell
Open ConverterConvert Perl to Julia
Open ConverterConvert Perl to MATLAB
Open ConverterConvert Perl to Lua
Open ConverterConvert Perl to Assembly
Open ConverterConvert Perl to Groovy
Open ConverterConvert Perl to Elixir
Open ConverterConvert Perl to F#
Open ConverterConvert Perl to Clojure
Open ConverterConvert Perl to Delphi
Open Converter