انجمن‌های فارسی اوبونتو
کمک و پشتیبانی => برنامه‌سازی => نویسنده: biotech095a در 08 تیر 1396، 11:34 ق‌ظ
-
دوستان سلام. من تو پرل یه چند خط کد نوشتم که تعداد یه رشته رو واسم حساب کنه ولی یکی بیشتر میشماره.
#!/usr/bin/perl
use warnings;
print("Enter your sequences: ");
$myseq =<STDIN>;
print "sequence: $myseq\n";
($length = length$myseq);
print"number of seq: $length\n";
مثلا اگه اینو وارد کنم AGCT پنج رو بر می گردونه . من از nano ُ eclipse+epic ُ ادیتور آنلاینم استفاده کردم همه میزنن ۵ . پرل من ورژن v5.22.1 آپدیتشم کردم به ورژن v5.26.0 ولی پیشفرض نمیشه. تو گوشیم یه ادیتور پرل دارم perli اون درست حساب می کنه . من لینوکسمم وژن ۱۶.۴ هستش.. ممنون میشم اگه کسی با این مشکل برخورده راهنمایی کنه.
-
اون یه دونه اضافه با حساب کردن کاراکتر خط جدید هست،هر زمان از ورودی استاندارد چیزی رو میخونید با تابع chomp کاراکتر خط جدید رو حذف کنید.
print("Enter your sequences: ");
$myseq =<STDIN>;
chomp $myseq;
print "sequence: $myseq\n";
($length = length$myseq);
print"number of seq: $length\n";
-
سلام. مرسی بابت راهنمایی، مشکلو حل کرد.
-
به انجمن خوش اومدید!
برچسب «حل شد» رو به عنوان این تاپیک اضافه کنید و اینجا (http://perlmeme.org/howtos/perlfunc/chomp_function.html) در مورد chomp بیشتر بخونید، همچنین صفحه‌ی man توابع پرل رو هم بخونید(perlfunc)